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CONSIGA UN REGALO SEGURO. 
Gratis poro usted una de estas 
tres cintas de programas, cuyo 
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jELUJA LA QUE QUIERA! 
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PARTICIPE EN VALIOSOS SORTEOS. Cado mes, durante el período de valided de esta oferta, 


sortearemos entre todos los cupones de suscripción recibidos UN ORDENADOR QL Y TRES 
MICRODRIVES CON SU INTERFACE: 

4 premios valorados en más de 260.000 PTAS. 

jCUANTO ANTES RESPONDA MAYORES SERAN SUS OPORTUNIDADES DE GANAR!! 
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DE 1985 


PRESS, S.A. 
C/ Arzobispo Morcillo, 24. 
Of. 4. 28029 MADRID. 
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INTERFACE DE DISCO PARA EL SPECTRUM 


La mejor noticia para los poseedores de un Spectrum 





Al fin los usuarios del Spectrum pueden 
lograr que su computador alcance la 
operatividad y velocidad que sólo el 
sistema operativo de disco puede 
proporcionar. 

Gran capacidad de almacenamiento, 
fulgurante acceso a los datos y mayor 
flexibilidad operativa. 


Cinta casette 

Es lenta y engorrosa y predispuesta a fallos 
debidos a la desigual calidad de la cinta. (En 
realidad, el casette no fue disefiado para ser 
usado en computadoras). 


Microdrive 

Son una solución al problema al ser más rápidos 
PERO continúan basandose en sistemas 

de cinta. 


La respuesta 

Las unidades de disco fueron especificamente 
disenadas para su aplicación en computadoras 
de forma que los datos puedan guardarse y ser 
leidos de forma segura y rápida. Además una 
unidad de discos emplea acceso aleatorio para 
obtener programas y datos de cualquier parte 
del disco sin tener que esperar secuencialmente un 
a que transcurran otros programas. MOVE 


La velocidad?. Sólo unos segundos. 
NEW 






Una exclusiva de: 


Sistemas Lógicos Gerona, S.A. 
À Avda. San Narciso, 24 (Gerona) 
17005 - Tel. (972) 237100 
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Algunos de los comandos empleados: 


sp Para borrar un archivo. 
Para Cargar un archivo del disco pen 


La respuesta para el usuario del 


Spectrum. 

El interface Beta Disk, se conecta detrás de su 
Spectrum para proporcionar una compatibilidad 
instantánea con cualquier unidad de discos tipo 
Shugart. De hecho puede Vd. conectarlo al 
interface 1 de Sinclair pudiendo operar 
indistintamente el Microdrive y la unidad de 
discos en completa armonia. 


Sistema completo 

El interface Beta disk de Silog se suministra con 
todo lo necesario para conseguir, de forma 
inmediata, una rápida y eficiente puesta en 
marcha. Para ello, cada interface se acompafia 
con un disco de utilidades que le permitirá, en 
forma extremadamente sencilla, efectuar copias 
de discos enteros o de programas individuales 
de un disco a otro. Los comandos de SAVE y 
LOAD son totalmente compatibles con el 
Microdrive y con el disco pudiendo diferenciar 
ambos de forma inequívoca. 


El interface Beta disk emplea solamente 128 
bytes de memoria RAM de su Spectrum. 










USAR Para cambiar el 
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do reorganizar la Situación.de 
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vacios. PEEK Par 
- a lectura al à 
Par eatoria de à 
ré à cambiaf el nombre de un POKE Para escritura al un dis 
Po Archivo del disco MERGE Para comb ais 
, mbinar 
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TRUCO PARA PONER 
UNA LINEA CERO 
PROGRAMA 







amente nuestros 
habrán observado 
n algunos programas en 
BASIC que estos tienen li- 
neas cero que no se pueden 
editar. La forma de realizar 
este truco es muy fácil. Lo 
primero que necesitamos es 
averiguar la dirección de la 
línea en memoria para cam- 
biar su número. Si hacemos 
PRINT PEEK 23635 + 256 + 
PEEK 23636 obtendremos 





HACIENDO UN INPUT 
EN MEDIO 
PANTALLA 







s lectores nos han 
preguntândonos si 
xiste alguna posibilidad de 
hacer que la sentencia IN- 
PUT se imprima en cual- 
quier parte de la pantalla, y 
no necesariamente en la 
parte baja de la misma, co- 
mo ocurre normalmente. 
Pues bien, con un poco de 
picardíia es perfectamente 
posible obtener este efecto 
como lo demuestra este pro- 
gramita. 


un número (23755 si no tene- 
mos el interfaz 1 conectado) 
que nos da la dirección en 
memoria de la primera línea 
del programa. Haciendo PO- 
KES con ceros en esta direc- 
ción y en la siguiente, deja- 
remos una hermosa línea 
cero que no puede ser edi- 
tada. 

Asi, por ejemplo, en el 
caso anterior bastará con 
hacer POKE 23755,0 y PO- 
KE 23756,0. El mismo truco 
puede emplearse en cual- 
quier línea del programa que 
no sea la primera, a condi- 
ción de conocer su direc- 
ción en la memoria. 


1) INPUT AT 22,0: AT 
D,D;“NOMBRE”,N$ 


Las posibilidades que 
ofrece este truco son infini- 
tas, pero tiene un pequefio 
defecto que rápidamente 
descubrirán nuestros lecto- 
res. Una vez que hemos con- 
testado al INPUT, éste se bo- 
rra. Para evitarlo, podemos 
afiadir esta línea que corre- 
girá el defecto: 





2) PRINT AT 6,0;“NOM 
BRE”NS$ 


JR BALLESTEROS 






METER VARIABLES 
INPUT 


frecemos un intere- 
ruquito para imprimir 
na variable dentro de un IN- 
PUT. Basta con utilizar el 
signo + para conectar un 
string con la variable que de- 


mos un ejemplo práctico: 

Naturalmente, podemos 
utilizar cualquier tipo de va- 
riable, normal o matriz, siem- 
pre que sea alfanumérica. Si 
queremos imprimir una va- 





OLE TAS - =: RG RA MA “a 


Rc INPUT NOMBRE DEL SA es 





seemos imprimir. De esta 
forma, el Spectrum constru- 
ye, primero, el string antes 
de la impresión y se consi- 
gue el efecto deseado. Vea- 


é<QUE PROGRAMA 
E? 






iImente cuando vd. 
un programa aparece 
en la pantalla el clásico 
mensaje: xxxxx o bytes: 





xxxxx. Pero imagínese que 
comienza a cargar su pro- 
grama y no aparece nada en 
la pantalla. Este curioso 
efecto se puede lograr utili- 


riable numérica, tendremos 
que utilizar la función STR$ 
para convertiria a alfanumé- 
rica. 


zando códigos de control en 
el nombre del programa. El 
ejemplo que sigue le aclara- 
rá algo las ideas: 


o 


cs 


cos 


] pe 249 + CHR$ 


Haga RUN, grabe el pro- 
grama resultante en una cin- 
ta e intente cargarlo des- 
pués de haber tecleado 
NEW. 


bida los trucos que nu 
res quieran proponer. 
Para ello, no tienen más 


CiArzobispo Morcillo, 24, 
Madrid-28029. 
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LOS PROGRAMADORES 








UN GENIO 





Gabriel NIETO 


PACO SUAREZ, 


CON PROVECCION 
INTERNACIONAL 





En una céntrica calle de Madrid se encuentra la sede de 
Cibernesis, la compania de Paco Suarez, el famoso 
autor de «La Pulga». Allí, un equipo de programadores 
trabajan incansablemente preparando sus nuevos 


El lugar no tiene apenas muebles, la 
única decoración que encontramos fue la 
de unos ordenadores que trabajaban in- 
cansablemente, dirigidos por un grupo de 
personas que han hecho de la programa- 
ción una meta en sus vidas. 

En la oficina de Paco comenzaba una 
entrevista que iba a tratar de averiguar 
algunos aspectos escondidos de la per- 
sonalidad de este genio de la programa- 
clón. 

Paco, antes de programador era dise- 
nador, lo que quizás explique un poco 
más el hecho de que sus programas es- 
tén contruidos con un gusto exquisito. 
Sus comienzos fueron como el de otros 
muchos, de la mano del ZX 81. Unos 
cuantos libros y un feroz deseo de inves- 
tigación, le fueron introduciendo poco a 
poco en este apasionante mundo. Cuan- 
do nos contaba cómo nació La Pulga, 
quedamos realmente sorprendidos. Pare- 
ce ser que lo que estaba intentando en 
realidad era explicarle a su hermano có- 
mo se podia hacer una parábola, y al ver 
los resultados, decidió incorporar un per- 
sonaje que fuera el que efectuara dicho 
movimiento, creando, de esta forma, lo 
que más tarde iba a ser un famoso jue- 
go. Pero si la historia del juego es curio- 
sa, más curiosa es la de cómo Ilegó a las 
manos de Indescomp. Parece ser que Pa- 
co presentó dos programas, uno de ellos, 
digamos el importante, era un programa 
sobre Astrologia escrito en Basic, y el 
otro, que presentaba como plato flojo, 
«La Pulga». Su sorpresa fue, cuando re- 
cibió una llamada de indescomp intere- 
sándose no por el programa que el creia 
sino por el que había enviado de relleno. 


6 MICROHOBBY 


La Pulga había sido realizada para un 
ZX 81 y hubo entonces que adaptarla pa- 
ra el Spectrum. 


Exito internacional 


Con la ayuda de Paco Portal, un ami- 
go suyo que se incorporó al trabajo, la 
nueva versión de La Pulga se pudo aca- 
bar en tres neses. Desde entonces, han 
aparecido nuevas versiones para otros or- 
denadores, todas ellas con éxito. Pero el 
verdadero éxito Ilegó cuando el progra- 
ma se comercializó en Inglaterra, a tra- 
vés de la compania Quicksilva, con el 
nombre de «Booga Boo». 

Paco nos cuenta que su fama en In- 
glaterra ha tratado de ser utilizada por 
otros programadores. «Ha habido algu- 
nos que han llamado a Inglaterra dicien- 
do que era yo, para tratar de vender un 
programa». Por otra parte, los derechos 
de autor, según él, no están nada claros 
en nuestro país. «Registrar un programa 
es un lio. Un programa de ordenador no 
está protegido por ninguna ley. Se pue- 
de registrar, pero eso casi se hace con vi- 
sión de futuro, esperando que haya una 
ley que proteja a los programas que es- 
tén registrados. Hoy en día, sólo lo im- 
preso puede estar protegido, por eso, si 
tu registras un programa tienes que pre- 
sentar un listado, el cual no te pueden co- 
piar, pero con las cintas pueden hacer las 
copias que quieran.» 

Cuando le preguntamos si la piratería 
era un problema grave para los progra- 
madores, sonrió levemente y nos dijo, 
«no me importa la de los chavales que 
se decican a hacer unas copias y se las 
pasan unos a otros, me da igual. Yo me 





Paco Suarez, un pionero de la programación en E 


encuentro a un chaval en el Rastro ven- 
diendo La Pulga, y hasta se la firmo pa- 
ra autentificarla; pero lo que me joroba 
son las empresas que se dedican a pira- 
tear. Hay tiendas que, si vas por la ma- 
nana a por un programa y no lo tienen, 
te dicen que vuelvas por la tarde que te 
hacen una copia. El problema es grave, 
máxime si tenemos en cuenta que la ma- 
voria de los programadores, si no la to- 
talidad de ellos, van a porcentaje sobre 
las ventas. 

Paco Suarez piensa que el mercado de 
Software en Espafia, aún no está lo su- 
ficientemente evolucionado y que sigue 
siendo el Reino Unido la panacea de to- 
dos los programadores. A pesar de ello 
no descarta la posibilidad de que, en un 
futuro próximo, exista en Espaiia una in- 
dustria de Software lo suficientemente 
importante como para crear un podero- 
so mercado. 


- Trabajar por cuenta propia 
En la actualidad Paco ha abandona- 
do a Indescomp y trabaja por su cuenta 
en una nueva compafiía que él mismo ha 
creado. «El hecho de montárnoslo por 
nuestra cuenta, es porque así podemos 
dirigirnos nosotros mismos todos los 
proyectos, eligiendo los que más nos ape- 
tezca y además, por la rentabilidad.» 
Programar juegos para esta nueva em- 





spafia. 


— A 21:44 





presa no es solamente un motivo de con- 
seguir dinero, sino que es a la vez una pa- 
sión para todos ellos. A pesar de ello, Pa- 
co Suarez sigue entusiasmándose por el 
campo de la investigación. «Mi meta es 
la investigación y estamos intentando 
conseguir crear un nuevo lenguaje». en 
este sentido, parece ser que ya se han uti- 
lizado algunos comandos creados por él, 
para un programa del Amstrand genera- 
dor de gráficos. 

Pero llevar una compania de Softwa- 
re no es una tarea fácil. Las grandes com- 
pafiías tienen muchas ventajas en ese sen- 
tido, quizás es por ese motivo, por el cual 
Indescomp sigue siendo la empresa que 





«La Pulga». 
Un programa 
espafiol 
número 1 en 
Inglaterra. 


distribuye los programas de Cibernesis. 
«Yo conozco gente que se lo monta por 
su cuenta y se vé agoviada por la canti- 
dad de trabajo que ello representa, inclu- 
so de gastos, y la promoción hay que sa- 
berla hacer también.» 


“Una técnica de programación 

Paco Suarez tiene una forma muy cu- 
riosa de hacer programas, según el mis- 
mo nos indicaba. «Hay gente que se 
plantea el programa y luego cómo resol- 
verlo. Yo suelo hacerlo al reves, primero 
se me ocurre una forma de hacer algo y 
luego le doy una utilidad. En La Pulga, 
se me ocurrió la forma de simular el tiro 


parabólico y luego hice el juego. En el 
último, he hecho algo parecido, primero 
se me ocurrió una forma de componer 
un mapa longitudinal, con tiras y tal, que 
me ocuparia muy poca memoria y con- 
seguiria muchas pantallas, y luego se me 
ocurrió en qué juego podia emplear ese 
(frTUCO.» 

Aunque siempre no es asi. «Algunas 
veces se me ocurre la idea primero, pero 
por que sé que tengo las técnicas que voy 
a utilizar en el programa.» 

Las técnicas de animación conseguidas 
en su último programa están muy logra- 
das. Tanto Paco como Cibernesis, tienen 
depositadas grandes esperanzas en este 
Juego, que ha sido el resultado de una es- 
trecha colaboración entre él y su equipo. 
En este aspecto hay que resaltar que es 
una persona muy abierta a los demás, 
trata siempre de enseriar a los que le ro- 
dean todo aquello que el aprendió du- 
rante anos de trabajo. 

Para Paco la programación es como 
hacer una película en la que él es el di- 
rector y consigue, a través de una técni- 
ca depurada, dar vida a unos personajes 
que llegan a ser, en un momento, parte 
de él. El último juego que ha realizado 
se caracteriza, sobre todo, porque los per- 
sonajes tienen su propia personalidad, la 
cual les ha sido dada por su autor y con- 
forme a ella se mueven y actúan en el 
programa. 

«Con el ordenador se pueden hacer 
obras de arte», nos decia muy seguro de 
si mismo. Para él, el ordenador no es un 
instrumento meramente electrónico que 
emplea la lógica, sino una máquina ca- 
paz de crear desde un juego simple a una 
autêntica obra de arte. Su nueva creación 
en este sentido, está en el buen camino. 
El estilo que ha impreso en todos sus tra- 
bajos le ha dado un prestigio lo suficien- 
temente importante como para atrever- 
nos a decir que es, hoy por hoy, un ge- 
mo cibernético con proyección interna- 
cional, 

Nuestro país empieza a despertar len- 
tamente. El gusto de la gente con respecto 
a los programas, es cada vez más exigen- 
te, y los programadores lo saben. Paco 
piensa que Ilegará un momento muy cer- 
cano en que haya una industria se Soft- 
ware en nuestro país lo suficientemente 
importante y quiere prepararse para for- 
mar parte de ella. Cibernesis es sin duda 
el camino, su camino. Un camino tortuo- 
so acechado por la pirateria, donde uno 
puede encontrar la gloria o sumirse en 
el más absoluto de los fracasos. Paco ha 
aceptado el reto. 
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PROGRAMAS MICROHOBBY 


EL LABERINTO 





Spectrum 48 K 


Nuestra misión en esta ocasión, nos Ilevará por 
espacios interestelares,en donde surgirán una serie de 
complicaciones en la nave que conducimos, 
obligándonos a tomar las medidas oportunas. 


Ante una averiía en la sala de máqui- 
nas de la nave nodriza, tendremos que 
descender a dicha sala y buscar el fallo 
causante del mal. Será allí donde dará co- 


mienzo la pesadilla: un largo laberinto 


de tinieblas del que será muy difícil 


salir. 
Para lograrlo contamos con cuatro ni- 


NOTAS GRAFICAS 


ILIRIESPILHPALSE 





oO 1 LET ti=0: BORDER O: PAPER 1 
ARS a CLS : GO SUB 9000: GO S 
UB 9220. GO SUB 9220 

e GO SUB 9960 
S LET ale=INT (RND+2) Go SUB 
4000; LET vh=10: LET hh=28: FLA 


6 co TO 8 

? LET k=((vh=2 OR vh=190 OR vh 
=18)=1 AND (hh=2 OR hh=3 OR hh=1 
4 OR hh=15 OR hh=28 OR hh=29) =2) 

RETURN 

10 GO SUB 9210. GO SUB 9040: G 
O SUB 9232: GO SUB 3500 

11 GO SUE 1000: GO SUB 3000 I 
F INKEY$<>"'' THEN GO SUB 9270 

12 GO SUB 7: GO TO 11+9+4(vh-hh 
<)0 AND hh-vh<>12 AND dae E ra 
No = 4d AND INKEYvS$=" AND 

20 0 SUB 9210, GO SUB 9060. G 
O SUB 9232: GO SUB 3500 

21 GO SUB 3000: IF INKEYvS<>" 
THEN GO SUB 9270 

22 GO SUB 7: GO TO 23+47+4(k=1 A 
ND INKEy$="1") 

es 60 TO E SUDO ve A hháos AND uv 
h-hh+4>4 AND INKEy$=" AND k=1) 

30 GO SUB 9210 So. “sus 207 G 
O SUB 9232: GÔ SUB 35020 

31 GO SUB 3020 IF INKEYS$<>"" 
THEN GO SUB 9270 

32 GO SUB 7: GO TO 33+467+ (ale 
=1 AND INKEvy$="t" AND k=11+267+( 
ate=0 AND ad t"* AND k=1) 

33 GO TO 31-112+4(vh-hh<>3 AND v 
h-hh<>4 AND vh-hh<>15 AND vh-hh «< 
+16 AND INKEY$="U" AND k=1) 

42 GO SUB 9210: GO SUB 9090; G 
O 5UB 232: GO SUB 3500 

41 GO SUB 32000: IF INKEYS$<> 
THEN GO SUB 93270 

42 GO SUB 7: GO TO 43+7+(hh-v à 
.>511 AND hh-vh<>10 AND INKEy$S=" 

AND k=11 

43 GO TO 41+489+(aLe=1 AND INK 
Ev$='u" AND k=1)+289+ (a Le=0 AND 
INKEY $=“u” AND k=1) 

sQ GO SUB 9210: INK 1 GO SUB 
29129: GO SUB 9232: GO SUB 3500. 

si GO SUB 32000: IF INKEYS$<»> 
As >; ço SUB 9270: PRINT AT 12,2, 

NK SG" a 

se GÔÓ SUB 7: GO TO 53+7+4(Vh-hh 
+51 ANDO vh-hh<>52 AND hh-vh<>513 A 
NO bh-vh<>12 AND hh -vh<>27 AND h 
h-vh<>526 AND INKEYy$S="t" AND k=2) 

a GO TO S1-11+(INKEyv$="U” AND 

K=1) 

50 GO SUB 9210: GO SUB 9110: G 
O SUB 9232: GO SUB 3500 É qo 

61 GO SUB 3000: IF INKEYS$<»> 
THEN GO SUB 9270 

be GO SUB 7: GO TO 63+7+%(vh-hh 
<>516 AND vh-hh<>15 AND vh-hh<>4 
AND vh-hh«<>3 AND INKEv$="t” AND 
ks2) 

63 GO TO 61-11+(INKEYy$="uU"” AND 


=1) 
70 GO SUB 9210: GO SUB 9080 6 
O SUB 4232: GO SUB 3500 À 
71 GO SUB 3000: IF INKEY$<>' 
THEN GO SUB 9270 


8 MICROHOBBY 


veles de dificultad, con un tiempo límite 
que debemos cuidar y con una serie de 
teclas para manejar el juego: «P», para 
ir hacia la derecha; «O», para ir a la iz- 
quierda; «Q», hacia arriba; «A», hacia 
abajo; «TI», para avanzar una pantalla, 
y «U», para retroceder una pantalla. 
jiSuerte!! 


73 GO TO 71-11+(hh-vh<>27 AND 
Ade -vh <>)26 AND INKEvYS$S="U” AND k=1 
3202 so SUB 9210: GO SUB S2sa G 
O SUB 9232: GO SUB 3500 

301 GO SUB 32000. IF INKEY $<> 
THEN GO SUB 9270 

302 GO TO 303+7+ivh-hh<>0 AND bh 
b=-vh<>1 AND hh-vh<c>527 AND hh-vh 
*26 AND (vh=2 OR vh=181=1 AND IN 
KEv$="t" AND (hh=2 OR hh=3 OR hh 


E 
=2e8 OR hh=29 OR hh=14 OR hh=15S)= 


1) 
S03 GO SUE 7 GO TO 301-271+4(IN 
KEv$='"'u“ AND k=2) 
3120 GO SUB 9210: GO SUE 326Q G 
O SUB 9232: GO SUB 3500 
IF INKEYvS$S+<> 


311 GO SUB 
GO TO 313+7+(INKE 


9 
9 
Sh 


"J 


THEN GO SUB 
sie GO SUB 
Y$="1" AND 


ty 
+ 
R] 
M] 
Õ 
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o] 
Oym 
LIGHO Pi JUS 
Somme = 
JO pZj=- 
a DIS UG E po 
cs 
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“om 
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TO 323+7+4(h 

512 AND INKFEY 

I+(INKEv$="'U" AN 

GO SUB 5050 [E 
3800 


1 

2 

fem À — 

& IF INKEYS 
po 

$& 


ww tw 
+ 
-90 
õ 
rn =z 
wo +L4nO 
Occhc q 
74 íDMm-m J 
"A 
Cow | 
«< 
: 


93*x((vh=2 OR v 
="t" AND (hh=2 
OR hh=29 OR bh 


-114((vh =2 OR vh 
Y$="uU" AND (bhh=2 E 
OR hh= es OR hh=1S 


210: GO SUB 8010: G 
3500 


IF INKEYS« 
270 


3+7*((vh=18) =1 AND 
D (hh=2 OR hh=53 OR 
S OR hh=28 OR hh=z14 


-471+4( (vh=2 OR uvh= 
Y$=ºu" AND (hh=2 O 
9 OR hh=15 OR hh=2 


10: GO SUB 38020. G 
2” 


7 35 
S11 GO SUB 3000: IF INKEYS$<> 
THEN GO SUB 9270 
Si2 GO SUB 7: GO TO S13+74(hh-v 
ho do AND hh- -vh<)11 AND INKEY$=" 
S13 60 TO S11-11%4(INKEY$="U" AN 


s5o Go SUB 9210: GO SUB 8030: G 
O SUB 9232: GO SUB 3500 
se1 GO SUB ao |” INKEYV$S<9"" 


9270 
See GO SUB 7: GO TO 5S23+7+(hh-v 
h<>13 AND vh-hh<>3 AND hh-vh<>12 
AND vh-hh<>4 AND hh-vh<>18 AND 
APBA AND INKEYyS$="t' AND k=1 


S23 GO TO 5S21-11+(hh-vh<>27 AND 
Abi AR dt AND INKEYy$=“uU"” AND k= 


1) 

530 GO SUB 9210: GO SUB 8040: G 
O SUB 9232: GO SUB 35 

S31 GO SUB 3000: IF INKEY$«<>'"" 
THEN GO SUB 9270 


532 GO TO 533-493+*( (hh-vh=13 OR 
hh-vh=12)=1 AND INKEvy$="t" AND 
(hh=2 OR hh=3 OR hh= o OR hh=29 
OR hh=28 OR hh=14)=1 
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S33 GO TO 531-11+(hh-vh<>27 AND 
vh-hh<>)1S5 AND vh-hh<>3 AND hh-vyv 
h<>26 AND vh-hh<>16 AND vh-hh<>4 
AND INKEY$='"U" AND k=1) 
O TO 1002-(hh<1) 
TO 1003 


pod fed pos pé 


TURN 

: BEEP .5,10: PRINT HO; 
sé? ar de nuevo s/n 72” 

; AP INKEYS<5SN” THE 


e 


NOW 909999 


Sri“ OSTxXxDPH-»RCLSOSSG 
“"0+40DPCMO 


De TAAD0IDOO 


AND 
SUERTE”: PAUSE 


i-1: PRINT HO;AT O 
“. IF NOT ti THEN GO f 


Eonê no de poanioRos 


UYONU DZVEZ- 


NS ash 


ETURN 
Q PRINT BO;AT 0,5; "TIEMPO QUE 
TE QUEDA": RETURN 
42000 PAPER GO: INK 7: CLS 
49020 PRINT *** FLASH 1; "PULSA EL 
1 PARA NIVEL DE INFANTE” "“PULS 
A EL 2 PARA EL AMATEUR” “"PULSA 
EL 3 PARA EL PROFESIONAL"**"PULS 
A EL 4 PARA NIVEL MASOQUISTA:”*” 
OTRA TECLA PARA PRACTICAS” 
4040 PAUSE OQ 
4050 IF INKEY$="1" THEN LET ti=zS 


Do 

> IF INKEy$='"2" THEN LET ti=3 
Ee IF INKEy$=''3"º THEN LET ti=ê2 
0 IF INKEvy$='4" THEN LET ti=1 


(7a) 

4290 CLS : RETURN 

5000 FOR r=0 TO 2: READ y: READ 
x: READ Lon: GO SUB 9050. FOR a= 
1 TO ton: READ dir; LET x=x+2+(d 


ir=1)-2+4+(dir=2): LET y=y+2+ (NOT 
dir)-BDa(dir=3): GO SUB 9050: NEX 
T a: NEXT r: GO SUB 9030: RETURN 
8018 Go sus 03230 GO SUB 9020. DU 
ATA 2,14 2,0,0,0,0,0,13,2,85, 
1,1,1 (/48/1 14,6,1,1,1,1,2,1 
8011 Abs tod 8018: 60 SÚB Sõdo 
RETURN 

8020 GO SUB 9930: GO SUB 9020: D 
ATA 2,2,8,1,1,1,1,1,18,14,146,1,1 
11,3,3,3,3,1,1,1,1,0,0,0,18,5,50 
1,1, D,3,91,1,3,3,1,151,3,3,4,1,3 


255,0,224,64,224,96,4,7,8,15,4 
212,114,82,96,224,16,240 44,29 4 
5,26,81,240,208,0,7,5,7,4,218 65 
1,59,12,224,64,224,96,4,7,8,18,5 
2,216,80,81,96,224 16 240 96,107 
206,202,83,223,226,48,7,2,7 4,1 
38,1$,11,0,224,64,224,96 4,7/2/7 
0,208,112,81,96,224,64,224 12,5 
9,202,10,82,242,512,7,18,8,7,4 1 
2,27,59,236,240,16,224,96 
9201 RESTORÉ 9240: POKÉ 23675,0 
POKE 23676,250: FOR c=0 TO 159: 
READ canie: POKE USR “a“+c,cani 
e: NEXT C 
9202 FOR q=0 TO 703 STEP 4: GO 5 
UB 9203+1 (RND$4): NEXT 9: RET 


9203 POKE Ses+a 145: POKE 60001+ 
34147: POKE 68 02+9,144: POKE 60 
03494146. RETURM 


9204 POKE ses 149: POKE 60001+ 
q,151: POKE 60062+4,148: POKE 60 
203+9,150: RETURN 

9205 POKE Seésa, , 153: POKE 60001+ 
3 155: POKE 60 ó2 2+9,152: POKE 60 
03+9,154: RETU 

9206 POKE Eeósia 182. POKE 60001+ 
36458: ,BORE 60 Ea 62+9, 156: POKE &0 
9202 PORKE geral Teu: POKE 60001+ 
9,163: POKE 60002+9,160: POKE 60 
003+9,162: RETURN 

9210 60 SUB 9120: PAPER 1: INK S 


POKE SE RE Cê POKE 23676 ,250: 
e 














RANDOMIZE US 4: RETURN 
9220 CLS : PRINT AT 10 São FLASH 
1, "AHORA TU CUERPO SER RRAN - DA 
TA 24,60,172,136, ss »18,80 4 
,160,224,64,0,0,0 dé “eo 8,60 
“580 194,98,4,12,12, 16 166! Shao 
64,24 ,66,44 6 656º 156 20,8, 
,24,16,16,16,16,48,24,60,44 8,56 
36,68,228,8,8,04,24,36,36 34,1 
8,12,30,22 ,4,28,18,6/2 2 1064 
,12,13,18,17,99 
9221 DATA 24,60,53,17,26,70,32,7 
2,60,52,5,7,2,0,0,0,24,60,52,16, 
B0,36,57,70,32,48,48,16,8,5,7,2, 
24,60,52,16,28,36,95,38,16,24,24 
/3,8,8,8,12,24,60,52 16,28,36,34 
,/39,16,16,24,24,36,36,668,99,48,1 
20,104,32,56,72,96,24,38,38,48,4 
8,72,72,136,198' 
9222 POKE 23675,255: aBOKE 29676 
250. RESTORE 9220 =0 15 
q. READ hom PORE ver" na e Con 
NEXT h: 
2230 GO SUB 9940: POKE 23675,47: 
POKE 23676,251: GO SUB 9950 
9231 GO SUB 9940: LET hh=hh- (INK 
EvS<>"" AND ATTR (vh,hh-1)<>13): 
de: = POKE 23675,31: POKE'23676,251: 
SU Dr GO SUB 9950 
E , z 9232 G0 SUB 9940: LET hh=hh- (INK 
5  Ev$="v” AND ATTR (vh,hh-1)<>13): 
& POKE 23675,63: POKE' 23676 ,251: 
GO SUB 9950 
a 9233 RETURN 
2240 GO SUB 9940: POKE 23675,143 
POKE 23676,251: GO SUB 9950 
3241 GO SUB 9940: LET hh=hh+( INK 
EY " AND ATTR (yhahhad) 3 4513) 
4941 RÉSTORE s020: co SUB 5000 4041 6AÉRCA:TENR à RESTORE 903 E a indo io dd 
, has sh 
RETURN 2: R pai TO 8: READ a: READ 9242 GO SUB 9940: LET hh=hh+ (INK 
8030 GO SUB 9930: GO SUB 9020. D BEER 1, o: INT AT 3 b;“d Ev$<>" AND ATTR (vh,hh+42) 0513): 
ATA 2,2,13,1,1,0,0,0,1,0,0,0,2,0 T as1,b-1; "4 “AT a+2 bo St POKE 23675,127: POKÉ 23676,251 
,/1,1,2,14,7,0,60,6,0,0,60,0,2,28,1 LAT a+43b; “t NEXT p: GO SUB 9956 
1,2,2,0,0,0,0 0,0, ,0,12 9243 RETURN 
8031 RESTORE 8&20530. GO SUP seo” 9040 GO “o see: qo e 9020: ses0 GO SUB 9940: POKE 23675,25€ 
RETURN ATA 12,2, E E (2, 2, 2 :- POKE 23676,250: GO SUB 9956 
8040 GO SUB 9930: CO SUB 9020 L 9, à à EE À é, ô 2? Vad E os 14,1,0, 9251 GO SUB 9940: LET vh=vh- (INK 
ATA 2,2,18,1,1,0,0,0,0,0,0,0,0,2 AB FOR 2: ss 68 ó, Ev$c2" 2 BND ATTRÇ (Vh-1,hh) 6213) 
51,1,14,1,2,14,14,/1,1,00,0,0,0,0 S644º ST SUB soco; KE ago7s, 15: POKE 23676 ,251 
2,0,1,1,1,1,2,28,3,0,60,0 PRINT AT 10,0 AT 11,0;' GO SUB 995 
êo4i RESTORE BÓsO) GO SÚE soodo RETURN 9253 RETURN 
RETURN 9050 BEEP .005,30: INK 7: PRINT 9260 GO SUB 9940. POKE 235675,79 
8050 GO SUB 9930 GO SUB Gozo D AT 4,X5" “SAT y41,X;” “: RETUR POKE 23676,251. GO SUB 5950 | 
ATA 2,14,7,0,0,0,0,0,0,0,18.2,5, É 9261. GO SUB 9940: LET. Vih Ev + (INK 
» MPE Mep MPS Tejo PRI Ke PR GR COPO: AE NO UPE, oco So SUB 9930: GO SUB 9 : Et vh+e <> 
8051 RESTÓRE 8050; GO SUE sõdo TA 2,4,16,1,1,1, 0:0,0,0,1 1 1,1 POKE, 23675,95: POKE 23676 ,251: 
RETURN E É i L, 1, 1,2,14,3,0,0,0,18,2,5,1 Edo pah 
ATA E BS LAB D,9 11,5 ! 9596 CO SUB 9940: GO TO 92714(IN 
as he brbAO SOGRO bs ese coco ABRUNNESTORE s060: 60 sus sado ARO tarte UR ATIAR AV TUMAS Ros E 
8061 RÉSTORE 8060. Gó SUÉ sooo vh + é +24 ( 
RETURN. 2678 Co sus gogo,| ga Sds Ev$="p” AND ATTR (vh,hh$41)<4513 A 
80720 .60 SUB 9930, CO SUB 9020, D 2404 0,0 .0,0, 0,0,9,1,1,2,14,7,0,0 NO ATTR (Vh$1,hb41)<219) +34 (INKE 
Pe DD De DA De 1 ndo RASA 
sos ds ds sds cO,3,5,3,5 9071 REÉSTORE 9070: GO SUE sa 9271 GO SUB 99480: RETURN 
8071 RESTORE 8070: GÓ SUÉ soco RETURN era 9272 LET hh=hh-(ATTR (vh,hh-21€5 
RETURN q082 Ga sus 2950 co sus soz0. D 13): GO SUB 9230: RETURN 
S080 GO SUB 9930. GO SUB 9020: D ATA 2,4, 4 28,17,0,0,3 9273 LET hh=hh4(ATTR (vh,bhe1)< 
ATA 2,2,9,1,1,0,0,0,0,0,0,0,15,2 2,2 ,2,8 É1é, 2 18,8 2,2,8, 9.16, 13): GO SUB 9240: RETURN 
pr rm Dede É x os E 1 1 E sos (go EM NIE SP So» RR Apa (7 À 4 18:33 mo 4 + + 4 qr. “ 4 E EL. 9274 LET: vh=vh-(ATTR tvh=-L,hh) <> 
6,1L,í,íi i,i,i 54,1 13): GO SUB 9250: RETURN 
2ê1 RESTORE 8080. GO SUE SaMO 990681 RESTORE 9080: GO SUB Sooe: 9275 LET vh=vh+(ATTR (vh+2,hh) «> 
RETURN RETURN 13): GO SUB 9260: RETURN 
9000 CLS : PRINT AT 10,1; FLASH 3090 co qSUB 9930: GO SUB s060; L 9930 POKE 23675,88: POKE 22676,2 
1; "SE ESTAN DIBUJANDO LAS PUERTA ET aBSCAS: LET ax=28: GO sUB 5906 SS: RETURN 
8". DATA 0,0,0,0,3,15,31,127,0,0 9940 PAPER 1: INK 7: PRINT AT vh 
,2,0,192 240,252,255,1,1,3,3,7,7 3106 co. SUB 9930: pRESTORE g04e: shh;. QUER 1, “AS AT vh+1,hh; QUER 
/16,15,158,18,7,7,3,3,1,1,128,128 30 SUB SQ00: RETU 1;*L": RETÚRN 
,192,192,224,224,240,240,240,240 2110 GO SUB 9950. is SUB 0070. L 9950 PRINT AT ybohhiCUIZAT vh+d, 
,224 ,224, 192,192,12838,128,127,31, ET ay-is: LET ax=2. ço SUB 9900: Pede o Rae" BEEP 10: ETURN 
2,0,255,36,255,36,36,0255,36,255 26. RETURN: S0050. READ y- POKE x,y: NEXT x 
9061 POKÉ 23675 ,88' PÓKE 236575 ,2 9120 GEEP .1,10: BEEP .1,20: BEE RETURN 
SS: RESTORE 9000: FOR a=0 TO 71: 1,360. RETURN 9961 DATA 62,2,205,1,22,6,22, 33, 
Roo Curia ME 80 PM gi OA N 3260 CLS : PRINT AT 10,1; FLASH 96,234, 224 13,13,197 48482» 52,22 
DAT o SERES TURN 1; "RHORA LAS TUBERIAS"" DATA 4, 15,121 5/126,21é 126/55 Sé 
pRco BORDER O: PAPER 1: INK 1: C [162/1146 198 SL RG IDA TE: 28,96 .5 ; 66 se, 26,815 2 1Bi/2is iso Bié, 126 
e Re Loo SUR IIRE, amo -capraio 
17,0, ,0 4,64 2;2 "Laber": SAVE “cm-Lla 
9030 DATA 1,2,9,2,17,2,1,28,1,14 65 0:60:60 268 ; 245 625 pro 0/8685 r“CODE 50000, 100 FD 
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Y a las innumerables personas que comenzando por orden 
alfabético en D. Salvador Abad y terminando en D. Ramón 
Zurdo Sánchez, han depositado su confianza en nosotros y 
nuestros programas desde toda Espafia durante 1984. 

Deseando seguir contando con su apoyo en este nuevo afio, a 


GCLCIA S 


todos, 








E PROGRAMAS MICROHOBBY 


DATABASE 





Spectrum 48 K 


Estamos ante un programa de 
utilidades que nos permitirá 
construir un fichero con tantos 
campos numéricos o alfanuméricos 
como precisemos. 


Una vez «picado», con la instrucción 
RUN, conseguimos una copia del progra- 
ma reducido a su mínima expresión. Por 
otra parte, todas las variables que preci- 
sa conocer (2), están definidas en el co- 
mando 15. Después de verificado, nos 
presenta un completo menú con siete op- 
ciones: la primera, pregunta sobre la 
composición que se quiere dar a cada re- 
gistro o conjunto de datos. A continua- 
ción, el programa pasa, por si solo, a la 
segunda opción,en la que se podrá relle- 
nar con los datos tantos registros como 


M BERROCAL 
























se quiera, sabiendo que se podrán ania- NKEY$>"7" THEN GO TO 120 n)15" NUEVO DATO?" ag(n,y TO y+d 
dir-made T030 LET V=VAL INKEYS: CLS : GO ii A ne de a 
l o + “ = Et IT tr ) » JULIA a To 
L 1ón, facilita | difi INPUT "CUANTOS CAMPOS ALEANUME O TND PRO denise id 
c > U "Cu > > bo E " : na<> (E sh 
La tercera opción, acilita la modifi RICOS TE RESERUO PARA CADA REGIS 3110 PRINT nO; "ALauno mas = /N 
aC E Poa: 3, “CAN 19 QtiS Pra r HEFEVv G=""< OP 
cación de uno o varios datos de un re TORO DÊ piGITOS POR cAnOD” 50 GI20 PRUSE O. IF INKEY8="s" OR 1 
gistro, con lo que, posteriormente, se ve- 1240 INPUT "euoNIOS CANDOS NUMER 5150 IF INKEV$=“n" OR INKEV$="N' 
| GISTRO?"“b: IF à=0 THEN LET d=0 q NEN RO TO Foo 
rá en pantalla el nuevo registro. La cuar- 1680 LET Ca(2+1) 244 (642) 55: LET O ROO O OISTRO NO 
el C=INT ((34 -(3+b) 410) 7c po e DEPARA IS 
ta opción, muestra, uno a uno, todos los 1030 PRINT AT 10,0; "EL NUMERO MA ano e = 
stros que se hayan introducido en cl  QESeMfrssiaIROS CON GL QUE E áles qr 220 TEN FOR mEi TO aj 
a , + U by q “> , é 1 “ pe a À me Sa E ato 1 , = 2, 
regis ros que se hayan introducido en e 1046 PRINT BO vConroché (S/N) Do 588 Un,4 TO ged-1): NEXT a 
mismo orden en que se ha hecho. NERVRC ANS PRENTELE COS TO sonda 3170 TF b20 THEN FOR m=i TO bi P 
e EA e Ade E Y$="€" OR INKEv$="5" RINT m+a;"- ",C$(MI;TAB (28-LEN 
La quinta opción permite clasificar to- 1282 E INhElâio” OR INKEv$="5 STRS INT ain a) Ps (nomo, NEXE m 
A 278 GO 3180 PRINT ““ “Conforme? (3/N) 
dos los registros introducidos: LOMO CM Per NO. oo ué TEN Gõ EO Mo De 
abéti . TO 1100 PRO ae a Ds OP & 
— alfabéticamente, si el campo es al- 1090 DIM a$(c,dta): DIM b$(a,10) 3000 TE INKES ERA OR ENKEN Gn Ni 
Fic J$(c,d) ER O 302 
fanumérico. 1100 IF b=0 THEN GO TO 1120 aLMEN GO TO 3020 
de mayor a menor, siel campo es nu- 1126 Gis “IE 'a50 THEN FOR 'n=1 T 1000 FOR n=i TO 2 
e h h - CLS : ã> x n= E ço A a TO NO = FA 
a y : p O a. INPUT “TITULO DEL CAMPO ALF DE TE A Dis mind No. DE ORDEN 
meérico. PARAM RED “; (0379 ; b$ in): NEXT sbós0 IF 3b0 THEN FOR n=1 TO a: L 
Re Ê 4 ET 4=1+tm-11 ad PRIN b$tm);," A 
o . 1130 IF b>0 THEN FOR n=1 TO b: 1 ) dad: | 

La sexta opción proporciona todos los NBUT CrITULO DEL CAMPO  NUMERECO ;3$(n,4 TO y+d-1): NEXT m PRINT 

registros introducidos, clasificados por el 4445! 580) NEXT n a PR RD 
A: 2000 IF z=0 THEN GO TO 100 NT ain,m));atn;m): NEXT m 
campo que hayamos decidido en la op- 2010 IF 2Z=c THEN PRINT AT 10,0; 4040 PRINT 40, "Para continuar pu 

.z FICHERO COMPLETO" ""““"Pulsa una Lsa una tecla” PAUSE OQ 
= Sos iLer essa pEtnTOfiddeno ce É888 NE oa 

eu p= as sy. 2 Z=7+1: g “2650 GO TO 108 
Por último, la séptima opción ayuda ORDEN: “;z “QUEDAN “;c-z,"” REGI 5000 IF z=0 THEN GO TO 5 
b Wi | bl 1 O 20º er | T, RA sa INGOT Dar aa NT Ea THEN FOR 1 
* 3: =1+tn- *d: sb: » o T a> "4 E = 
ad de pro aja O ENE beta bran io du SO af O RENT FAR SALDO OL TAC) 
: ] “ PRINT b$(Nn);,": ";ag(z,y TO y+d NEXT n É 
c 21) - 22030 b»> = ; | Q;n+4+a,!- , E | X 
Y optar por seguir trabajando o desen NPUT “DATO EN: “; (c$(n))catz,n): n 3 
chufar PRINT c$tn),":“, TAB (28-LEN STR S030 INPUT “Introduce la opcron 
, E INT aítz,n))i;acz,n): NEXT n que deseas''y aqui 
2040 PRINT "Continuamos? (S/N Sõ40 TE. 62 OR uoa+b THEN CLS 
Do. U 
RS 2050 PAUSE O: IF INKEYS$="s" OR I S0s0 IF Uva THEN LET y=y-a: LET 
NKEY$="S” THEN CLS : GO TO 2000. u$=cs (ul GO TO ss0o 
1 SAVE "CLASIFICA” LINE S ado IF INKEV$="n” OR INKEY$=N S06O LÊÉT u$=b$(y): LET u=(4-1)44 
2 PRINT AT 10,0; “REBOBINA Y 4 THEN GO TO 100 +1 
ERIFICAREMOS" — * 2070 GO TO 2050 S970 FOR n=1 TO Z: LET d$ini=asi 
3 VERIFY "" 3000 IF 2z=0 THEN GO TO 100 . ny TO Vid-1): LET Bin 07=sn- NÉ) 
4 CLS : PRINT AT 10,0; “CORREC 3010 INPUT “QUE REGISTRO QUIERES T'n 
TO": PAUSE 150 EM MODIFICAR?"Cn: IF n>z THEN PRIN saso cLS PRINT AT 10,0, “ESPERA 
S LET z=0: LET u$=" " TRT 12,0, “NUMERO DE REGISTROS UN POCO. "ACASO CREÉS QUE sOY 
1: BE 4 GO 7 30201 UNA MAQUINAS" "ESTOY CLAS 
oxÉ ae nBER à: assa F 3020 CLS - PRINT “REGISTRO No. " CANDO" 

100 CLS : PRINT TAB ;no*: IF a>0 THEN FOR m=1 TO a S090 FOR m=1 TO z: FOR n=1 TO z- 
E Cvi- INICIALIZAR F LET eba (nad) dd: BRENT NGS eis Do da an o Raniai id 
= nã 6 (m);" “+48 tm, — Mo ado om um! (a d n ) (th + 1 | +“ i 
ICBR UN REGISTRO? SO m: PRINT “* $=d$(n): LET dgtn)=dgin+1) LET 
GISTROS INTRODUCIDOS'**"S- CLASI 3030 IF b>0 THEN FOR m=1 TO b: P d$(n+1)=t8: LET g=bín,2): LET ki 
FICAR'*““E- LISTAR REGISTROS CLA RINT m+a,"- “;C$(M), TAB (28-LEN Q,8l=bíns1,2) LET bine1,25= 
SIFICADOS“"-“7- GRABAR PRO MA” STR$ INT atn,mi);a(mn,;m): NEXT m 2110 NEXT no NEXT m RE quá 
é Rana T Ia >: 3040 INPUT “QUE CAMPÓ QUIERES MO 5120 PRINT EO, FLASH 1; “PULSA UN 

INVERSE DIFICAR?”'m A TECLA”. PAUSE O: Go To 190 

110 PRIN opcion q “050 IF m>a THEN LET mn=m-3: GO T 5500 FOR n=1 TO Z: LET bin,1)=34 
ve deseas” O 3100 n,4) LET bin,2)=n: NEXT r 

120 PAUSE O: IF INKEY$<"1" OR 1 3060 LET y=1+(m-1)44: INPUT (b$i Séio CLS - PRÍN 


1 =! 
T AT 10,0, "ESPERS y 
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rá 
UN POCO": "ACASO CREES QUE so” 6010 CLS : LET n=bim,2) o TODO ANCUT nMONORE DEL CEO 
UNA MAQUINA?” "ESTOY CLASIFI 5020 PRINT “No. DE ORDEN “,m, Er a" CCASTR IRA 
CENDO. dd THEN FOR Pei Tó >010 FF LEN 18710 THEN LET t$=ts 
ss20 FOR mnz1i TO z FOR n=1 TO Z- soso IF a>0 THEN FOR p=1 TO 5 E , TO 19) 
“na e k Sa ET g=(p-lisd+1: PRINT dp “020 CLS - PRINT AT 10,0; "VAMOS 
SS30 IF bín,1i)<bt(n+1,1) THEN LET jagin,u TO gy+d-1) NEXT P' PRINT ALLA ” o nd den 
uy = Fr = n 19 Es À 
LET E TASL AT REMETE? LE 8040 ER Bro THEN FOR Bmi DO bi R 2050 SAVE tt e 10. ES RED 
= = >] = RR RAT eo- " ty 
Do Dn R O SST dr e SD OA INT a (tn,p)J;atn,p): NEXT p asa ERA a AS 
Êsso NEXT n. NEXT m 6050 PRINT HQ, "Para continuar pu 2280 Gs PRINT AT 10,0; “VALE T 
ESSQ PRINT HO, FLASH po gs é da LIN OR OS ae E PAUSE O ITO 2 PF" 0 HAS BORDAO* 
A TECLA”: PAUSE GO. GO To 108 BOE m dio = 
6000 FOR m=1 TO 2 E070 GO TO 100 7070 PAUSE 250: GO TO 100 
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Con este programa 
podremos ensariarnos 
a gusto y eliminar el 
mayor número de 
mosquitos con tan 
sólo apretar un botón. 
Compruébelo. 


Para llevar a cabo tan agradable tarea, 
disponemos de dos sprays que nos apa- 
recerán en la base de la pantalla y que 
cuentan con una capacidad total de cin- 
cuenta disparos. Con este potencial ten- 
dremos que atinar a una oleada de vein- 
te mosquitos que irán apareciendo suce- 
sivamente. Hay que tener en cuenta que 
el desplazamiento del mosquisto por la 
pantalla no es rectilíneo, sino que presen- 
ta ligeras variaciones, con lo que «atinar» 





A PERERA 













LÓ ! th To 9587? GO TO 60R 12. PAUSE 2: NEXT i 
es cuestión de reflejos y habilidad. Pta a EE RR apa ar se TF e -ê2 THEN PLOT 184 28. 0 
: : Eo,e es PLOT 17412 AU -108,-2 - 
S1, a pesar de todo, nuestra punteriía =0C1Só 1º0 “beEP .08) PLÓT QU 1, 184,26: “DRAU OVER 1,-108,-20 
ER 145170 CRAU OVER E 150, 150 540 IF E=21 TMEN PRINT ,AT 20,9 
no es certera, una plaga de mosquitos de PRINT ÁT 20,0, INK 1;"f”: LET CCMAT 19,9; "CRU SAT 21,10; 
bará dest d -2-1. IF 21-y=e OR 21-y=e+1 THEN E pn 
olra «raza» acabara destruvendo nues- GO TO 400 5453 ; S5,-12 Ze 
R à y a Já 230 IF INKEY$="Pp” THEN PRINT AT ás IF e=2l THEN FOR i=l TO 20 
tros sprays ya vacios. Asi que, jánimo y 20,10; INK 1; “we”: PLOT 97,17: D BEEP .01,i/4: BO (io 
: RAL 150,150: BEEP .05,36: PLOT O NEXT é A 
punteria! VER 1,9%,17. DRAW OVER 1,150, 150 SS0 IF e=12 THEN PLOT 104,25: 0 
; AT 2 : LET RAL -104,-20. PAUSE 3: PLOT OVER 
PRINT AT 20,10, INK 1;' 4 
c=c-l.o IF 321-y=e OR 31-y=e+1 TH 1, 104,25: DRAW QUER 1,-104,-20 
nnE— EN GO TO 4920 A = ES nal ore PRINT AT co, 2, 
so EEEP (015,12 atoa + >, / k el R 
S PRINT AT 11,8 SOUuI são drogado LHENRRINTORT Vi Secr Loi)o 74 EORDER INT to 2e 
do PRINTOET 106. =80 LET ese INT (RND42) ra e=B THEN CLS : GO TO 440 
252 GO TO 160 E: = LL 
100 CET :=2+1: PRINT INK G:AT EB0 GO TO 610 j 
dos sprays Ç g-L “ocre. BEEP 9.9,-25: PRIN 10020 FOR f=Q TO 7: READ cg: POKE 
tos" dr Pta ERR dE ; E VARAS 
"BO PRINT 100 GEES Says RE ATO Ra Oq O 1615 ror'(26ºTo"SÍT REM cg: POKE 
erdo º" (P) Spray derecho "** 410 LET b=b41: LET €=29 USR “"B'+f,cg: NEXT f 
SO PRINT LOS mosquitos a 430 IF b>19 THEN CLS - GU TO 4é 1020 FOR f=0 TO 7; READ cg: POKE 
&can en cles- das de 20 y sol Ri € USR “C"+f,Cq NEXT f 
O DAS CONEA GR. (SO S4BPRSCE: 4:30 GO TO 140 1230 FOR f=6 TO 7. READ cg: POKE 
vi 108 matgastas NO tencras 4420 PRINT AT 6,11; INVERSE 1;'G USAR “D'+f,C9: NEXT f 
PRRRISU SDS SAE MEMBENANES o AME OVER": INVERSE O 19040 FOR (=0 TO 2: READ c9: POKE 
So PR A 450 PRINT AT 8,11; "PUNTOS=";5;A 1DSB OR" FSO NET RÉAD €9: POKE 
Et a : eye E USR “FE“4+f,cgo: NEXT f 
So d N ) Ras 19060 FOR f=0 TO 7; READ cg: POKE 
So EORCÊ IF s=18 OR S=19 THEN PRINT DOR pon tous par BOKE 
“O LET b=0; LET s=0: LET c=S0 470 IF s=20 THEN PRINT AT 15,2; 1050 FOR F2Ô TO 7. READ ca POKE 
120 LET e=23 “nas conseguido o Gera do. USR “I"sft,cg: NEXT f 7 5 
PRINT “PUNTOS y plaga. TE atreves c Se / POK 
120 PRINT INK AT 21,0; À gaga 480 IF 5<6 THEN PRINT AT 15,2;' TE ste A TO sa rRÇ eo 3 
DISÊ Destruido por e ELZA qtde H+ 1030 DATA 1! E! 4,7,63, S1, 192,0,48 
130 PRINT INK 1,AT 20,0; pago 490 FOR f=-10 TO 10. BEEP 0.1,f 2458 204 240' 240 “a 
20,10, Ti iG ROR et es NRO 6a BRIRP fiação 5606 PATA 140165068 ,0,36,0,72, 
140 LET 4=INT (RNO+17) +2 7 ne ERG BE OA ara 
S PRI T ,30; “AT Soo IF INKEV$="" THEN GO TO SOR ,8,0,66,0,36,0, 
Pião Pause 20: Eee co RAS BOSE ISO GOTO 08, , 0,05 BRBrO Na ONA MAO IGREO BUO 260, 
SO PAUSE SO P 0.1, LET e= 214,47; 240,0,32, 
180 LET Ney. LET Oy SS TANT «RNDE PRÁY GASTADOV! “ 2020 DATA 126,32,12,30,255,6,0,1 
MM Li -=(1S=9) + tL1=9) 810 E dl e, AT 48 HMM ASAS O DRE RO MRS 7 AR o BR 
, — " e " “o. , 2 e +. 
NE SAPO 6 nat CP RANA (é SIS C+1; MA ";AT 16,042; asa DATA, ass 255,255,24,24,24,2 
130 IF C(<=6 THEN PRINT DVER 1;R “da “: FOR i=i TO 6: BEEP .615,- 4,24,0, ,855,055,255,24 
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REM Somos profesionales 
REM Da mejor servicio 
REM Tenemos también COMMODORE, ATARI, 
ATMOS y COLECO, HARD y SOFT 
REM CAMBIO acepta equipos de 2' mano 
al adquirir otro nuevo. 
REM Consultanos tus necesidades. 


HARD QL 


1 QL 128 K 

32 Bits + 2 Microdrives 
Teclado espaniol, manual castellano 
1 Joystick 

1 Impresora serie CP-100 
1 Cable conexión | 
1 TV color ELBE SHARP 14" E 


s 



















T + 
1 EIefo eloa ido 2:30 “"s e- 

a ASR Ai Sm = 
) = o nd " a as sd 






Sin TV y con monitor alta resolución 280.000 Pts. 


SOFT QL (Incluidos) 


QL QUILL Tratamiento de textos 
Lo que se ve en la pantalla aparece en la 


impresora. 


QL ARCHIVE. Base de datos. Con lenguaje 


propio. 


QL ABACUS. Hoja de cálculo. 6.000 celdas 


programables. 


QL EASEL. Gráficos. De barra, de tarta, de 


puntos, de lineas. 


REM NOTICIAS 


REM CLUB SPECTRUM 

Y COMMODORE 

Funciona como un club de video. Se 
adquiere una cinta y se intercambia 
con otras a 200 ptas semana En 
cintas inglesas 400 ptas semana 
Sólo versiones originales 

QLUB 

Para usuarios del OL. Solicita infor- 
macion 

REM CURSOS 

Basic 1/2 M/C y aplicaciones 

REM FRANCHISING 

Si quieres montar tu própia mini- 
tenda de informatica O una tienda 
especializada, envianos tu dirección 
y recibiras informacion completa 
REM DETALL 

Si quieres vender nuestros produc- 


tos envianos tu direccion y recibirás 
puntual información 


REM PEGATINAS 

25 ptas 3 modelos: REM MEMBER 
ME. REM | LOVE YOU, REM 
FOREVER 


REM CAMISETAS 

990 ptas 3 modelos REM MEMBER 
ME. REM | LOVE YOU, REM 
FOREVER. Indicar talla: pequena, 
normal y grande 

REM GRAPH 

Kitgráficos 6 colores 990 ptas. (REU- 
TILIZABLE) 

REM GRAPH 

10 plantillas teclado reutilizable 900 
ptas 







çã, 


1 REMNSHOP ) 
RENSHOP 


Ordenadores personales 


RENOVACION EN MARCHA, S.A. REM SHOP - VALENCIA 
c/. Espronceda, 34 - 2º int. - MADRID-3 c/ Maestro Palau, 12 
Teléfono (91) 441 24 78 Teléfono (96) 331 53 27 


REM SHOP 1 
c/. Galileo, 4 - MADRID-15 
Teléfono (91) 445 28 08 





REM SHOP-BARCELONA 
c/. Pelayo, 12 - Entresuelo J 
Tel. (93) 301 47 00 


HARD SPECTRAVIDEO 


| BUS soscscussecaragsscaro es 67.500 


1 Unidad doble discos con 
controlador y salida centronics .... 






SOFT SPECTRAVIDEO 


Spectra CheckbOOKk: «sau nz gas iss covas 2.300 

Spectra DAP ; qu ss acarsasaacs e mas 2.300 

ATMmOUred ASSQUR cusssuassics ds ruyppazas 2.300 

SDOCHON;: musas pra na use emas 2.300 

NGS se a E ES EN E QU 2.300 

Sprite GONCTMOL us crase sema 2.300 

FONEEARO qua pr esaesnss ras seas 2.300 

Spectra File Cabinet . . sus sus sussa seres 2.300 

SDECha TYDO qa cus reza uva cem cares amena 2.300 

Sector Alphã (CAMUCHO) sa acas sussa 4.900 

Super Cross Force (cartucho). ............. 3.500 
uu 
PRECIO TOTAL 
26. 190ptas. 


p==—————————————————— 


BOLETIN DE PEDIDO 


Nombre y Apellidos 

Dirección y Telefono 

Deseo recibir más información 

Deseo adquirir 

Precio total (incluye 300 ptas. de gastos de envio) 


Giro Postal [) Giro Telegráfico [] Transferencia Bancaria LU] 
Ingreso en cuenta 3769/8 BANCO DE BILBAO Rios Rosas, 44 
MADRID-3 

Talón adjunto [) Talón confirmado adjunto L) 
Tarjeta VISA numero 


Fecha caducidad Firma 


EERISGEREE NUEVO! PROGRAMAS PROGR 
SUPERGRAFICOS 


Uno de los problemas fundamentales con los 
que se encuentra el sufrido programador es 





01 do doador Sur elas pamtallas. 


a pres tmça a 
doi Molhos Dra ph a a hacerlo de 
la forma más simple y con libertad más 


absoluta. 


Melbourne / Investrónica 
48 K 


Tipo: Utilidades Gráficas 
PVP: 2100 


“ -INVESTRONÍSR 


SUPERGRAFICOS 
SPECTRUM 48K 
ns Se trata de la version 

traducida del 

Melbourne Draw, el mejor 

programa, con diferencia, 

que existe actualmente en 
el mercado del Spectrum, 
además, uno de los más 
utilizados por los creadores 
de programas, ya que por 
sus condiciones resulta 
idóneo para todo tipo de 
creación gráfica que uno 
sea capaz de imaginar. 

El programa ha sido creado 

por Philip Mitchell y tiene un 

menú completísimo, con el 

que es posible acceder a 

cualquier modo gráfico: 

Ventana de información — 

Son las dos líneas inferiores 

que se utilizan para indicar 

el estado actual del 
programa. Ahí nos irá 
apareciendo toda la 
información necesaria para 
acceder a los diferentes 
mandos y cursores que 
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gobiernan el control del 
programa. 

Cursores— Hay ocho, cada 
uno de ellos controla una 
dirección diferente. Su 
distribución es muy lógica y 
el manejo bastante simple. 
Formas de marcar 
pantallas— El modo Normal. 
con el que se recorre la 
pantalla en la dirección 
elegida. El modo Dibujo, que 
se utiliza para activar los 
pilxes por los que va 
pasando el cursor. El 
Borrado, que apaga todos 
los pilxes y el modo de 
Inversión, que, como su 
propio nombre indica, sirve 
para invertir el estado de los 
pilxes. 

Agrandar Cosas— Es una 
posibilidad de las más 
interesantes, ya que nos 
permite aumentar una parte 
del dibujo, con lo cual es 
posible dibujar con una 
enorme precisión. Se puede 
hacer de 4 a 16 veces 
mayor. Al trabajar en una 
pequena porción de pantalla 
aumentada, habrá veces que 
tengamos que desplazarnos 
desde un bloque a otro de 
la pantalla, lo que hace el 
programa de forma 
automática. También hay 
una forma aún más sencilla 
de conseguirlo, se trata de 


desplazar el cursor hacia 
una de las ocho direcciones 
posibles. 

Otra posibilidad que incluye 
el programa es, por ejemplo, 
el poder jugar con los 
atributos a nuestro antojo, 
teniendo en cuenta, eso si, 
las limitaciones del 
Spectrum en este campo. 
También se puede cambiar 
el estado de estos, según 
nos convenga en cada 
bloque de dibujo, 
accediendo a ellos de la 
misma forma que lo 
haríiamos en el método 
directo de obtención del 
color. 

Se puede rellenar un área 
de pantalla delimitada por 
una serie de líneas, de 
forma automática. El método 
no resulta demasiado rápido, 
pero esto es lógico, ya que 
se ha hecho con el fin de 
poder detectar los posibles 





errores y poder corregirlos 
con tiempo suficiente. 
Cuando queramos incluir 
textos en la pantalla, 
emplearemos la opción 
correspondiente, la cual nos 
permite escribir caracteres 
alfabéticos en mayúscula, 
en minúscula, números, los 
simbolos rojos de la parte 
superior de la tecla y los de 
la parte inferior. Esta opción 





nos permite también teclear 
los caracteres definidos por 
el usuario (UDG). 





El desplazamiento del | 
contenido de pantalla | 
(SCROLL), es otra de las 

maravillas de este programa. 

Nos permite colocar cosas 

donde queramos, en 

cualquiera de las ocho 

direcciones posibles. El 





desplazamiento puede ser 
de dos tipos, punto a punto, 
sin afectar a los atributos O 
desplazamiento de estos 

últimos. 

Los caracteres UDG, se 

pueden definir a través del 

programa y grabarlos 

posteriormente para 

utilizarios en nuestra 

pantalla. 





Otras opciones posibles, 
además de todas las 
resefiadas, son, por ejemplo: 
Mover la ventana de 
información de la parte 
inferior a la superior O 
viceversa. Acelerar el 
movimiento del cursor. 
Contraer y expander la 
pantalla y, si se desea, 
invertir de izquierda a 
derecha la pantalla. 

El programa es 
completíssimo en todos los 
sentidos y, además, una 
inestimable ayuda para el 
programador, que tendrá 
toda la libertad de 
movimientos que pueda 
imaginar a la hora de crear 
Sus gráficos y confeccionar 
'las pantallas. Muy bueno. 


AMAS PROGRAMAS 


AD ASTRA 


Gargoyle Games/lbeson 
48 K 


Tipo de juego: Arcade. 
PVP: 1.500 ptas. 


A) 
ASTRA D 


“AD 





Es un juego dentro 
de la más pura 
linea del estilo Arcade, ya 
que la acción se sitúa en el 
espacio galáctico y nuestros 
enemigos son centenares de 
naves que surcan la frontera 
del espacio conquistado por 
los terrestres. 

Nuestra misión es la de 
impedir que atraviesen ésta, 
mientras viajamos de una 
estación interespacial a otra. 
Los enemigos surgen de 
todos lados intentando 
destruirnos: cruceros piratas, 
robots de barcos Scout, 
bombas explosivas 
multidireccionales, 
gigantescos campos de 
minas, impenetrables 
cortinas de bombas y minas, 
y los peligrosísimos 
meteoros errantes que 
surcan el espacio en forma 
de despojos interestelares, 
que pueden chocar, en 
cualquier momento, contra 
la nave patrulla que 
dirigimos. 

El juego es bastante difícil, 
sobre todo teniendo en 
cuanta la rapidez con la que 
nos movemos, tanto 
nosotros como nuestros 
enemigos. en este aspecto, 








hay que resaltar 
precisamente que el 
movimiento está muy bien 
logrado y es bastante buena 
la respuesta de los controles 
en todos los aspectos. 
Gráficamente, el juego está 
también muy bien, los 
meteoritos, naves y demás 
artilugios tienen un disefio 
muy apropiado para este 
tipo de juego, dándonos la 
sensación en todo momento 
de estar librando una dura 
batalla interestelar. 

Es posible la utilización del 
Joystick, lo que facilita algo 
la complicada tarea. 
También incorpora la 
posibilidad de jugar dos 
jugadores, lo que da cierto 
aliciente a la partida. 

Un juego puramente Arcade 
en el que las Iluvias 
contínuas de enemigos y 
objetos peligrosos, van a 
poner a prueba nuestra 
capacidad de reflejos. No 
hay ni un momento de 
descanso durante toda la 
partida. Recomendado para 
los más hábiles de la casa. 


ERE/Software Center 
48 K 
Tipo de juego: Simulador de 
empresas. 
PVP: 3.000 ptas. 
Es un programa 


E educativo que 


pretende introducirnos en el 
complicado mundo de la 
gestión de empresas a 
través de un juego ameno 








que simula los casos reales 


que se producirían si 
dirigiéramos una empresa. 
Nos permite enfrentar a los 


distintos aspirantes al puesto 


de director, proponiéndoles 
situaciones simuladas que 
van a servir para medir las 
consecuencias económicas 
de sus decisiones. 

Pueden jugar desde uno a 
cuatro jugadores, los cuales 
tendrán que asumir los 
diferentes papeles 
principales de la sociedad: 
Presidente de la sociedad, 
Presidente de Producción, 
Director de Marketing y 
Director financiero, 

Cada trimestre, se reunirá el 
Comité Director con el fin 
de anotar los resultados del 
trimestre anterior y tomar 
decisiones. Una vez se 
hayan tomado éstas, el 
programa simula las 
consecuencias económicas 
que se derivan de las 
decisiones adoptadas 
anteriormente, y las refleja 
dentro de los diferentes 
elementos que integran el 
cuadro de mando de la 
Dirección propuesta por el 
Comité Directivo. 

El análisis de dichos 
cuadros a cargo del nuevo 
comité, permite tomar 
posteriormente nuevas 
decisiones para el próximo 
ejercicio trimestral. 
Dependerá del análisis de 
resultados de cada trimestre 
la puntuación que 
obtengamos, la cual a su 
vez, será la que se 
encargue de medir la 
calidad y acierto, o no, de 
nuestra gestión. 

Existe una posibilidad, 
dentro de cada ejercicio, de 
que ciertos acontecimientos 
que vienen del exterior 
perturben el análisis 
realizado y ocasionen 
retrasos en nuestra gestión. 
Al igual que ocurriria en una 
empresa real, puede 
producirse una inflación, la 
cual nos llegará de forma 
aleatoria y puede originar un 
aumento de los cargos de la 
compafiia. Además de esto, 


PROGRAMAS PROGRAMAS 








se producirá un desgaste 
del material de producción y 
legará un momento en que 
se produzca un desfase de 
actualización de material, 
que influirán sobre las 
ventas del artículo. 

Es un juego muy completo 
que nos va a ayudar a 
comprender mucho mejor el 
complicado mundo 
empresarial, adentrândonos 
en él de una forma bastante 
clara y a la vez entretenida. 
El programa está, 
educativamente, muy bien 
pensado. 

Como en la mayoria de los 
juegos de este tipo, no tiene 
gráficos, sin embargo esto 
no es ningún inconveniente. 


Investrónica 
48 K 

Tipo: Didáctico 
PVP: 1.900 ptas. 








Es un pequefio 

tratado de solfeo 
que aprovecha las limitadas 
posibilidades sonoras del 
Spectrum con el único fin 
de ofrecernos un programa 
musical que, a la vez, 
resulte entretenido para 
todos. | 
Nada más cargarlo, lo 
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primero que aparece es un 
menú con tres opciones 
diferentes: Un teclado 
musical, seguir canciones y 
componer música. 


La primera opción convierte 
nuestro ordenador en un 
instrumento musical capaz 
de generar 108 sonidos 
diferentes, en nueve escalas 
diatónicas de doce sonidos, 
formados por siete notas y 
cinco alteraciones. Cada 
nota que tocamos es 
visualizada en pantalla con 
el nombre correspondiente. 
Puede elegirse la duración 
de cada nota entre una 
escala que contiene 9 
valores diferentes. Otra 
posibilidad es la de 
repetición opcional, 

La opción de seguir 
canciones, consiste en 
escuchar una serie de 
melodias y poder ver 
aspectos importantes sobre 
el tono y el ritmo, ya que 
podemos elegirlos antes de 
empezar a escuchar la 
música. Si lo que queremos 
es interpretar nosotros las 
melodias, nos aparecerán en 





pantalla las teclas que son 
necesarias tocar y 
tendremos que darles la 
duración exacta, una buena 
forma sin duda de aprender 
a manejar el ritmo, 

La tercera posibilidad, es la 
de componer música. 
Dentro de ésta hay a su vez 
tres posibilidades distintas: 
Composición gráfica sobre 
pentagrama, composición 
rápida y control de almacen. 
Se puede componer, 
reiniciar una composición, 
modificarla, tocarla, 
almacenaria o sacarla por 
impresora. Otra posibilidad 
es la de componer de forma 
automática, en cuyo caso es 
e! propio ordenador el que 
compone. 

Además de todas las 
opciones mencionadas, 
existen algunas más que 
nos permiten diferentes 
convinaciones de método 
que, unidos, pruducen 
efectos sonoros muy 
curiosos. 

La idea es buena, el 
planteamiento correcto y los 
resultados aceptables, por lo 
que puede resultar un 
programa idóneo para 


“aquellos que quieran 


iniciarse en el apasionante 
mundo de la música o aún 
no conozcan 
suficientemente el invento 
en cuestión. 


SERLOCK HOLMES 


Melbourne House 
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Tipo de juego: Aventuras 
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Los creadores del 
Hobbit vuelven al 
ataque despuésde algún 
tiempo con esta nueva 
creación, que, al igual que la 
anterior, reúne los mismos 
términos de atmósfera y 
sofisticación. Uno de los 
rasgos más sorprendentes 
es, al igual que en el Hobbit, 
la libertad de acción de 
todos los personajes que 
intervienen en el juego, es 
decir, éstos pueden hacer 
cualquier cosa que se nos 
ocurra por muy compleja 
que parezca. Se puede 
incluso llegar a interrogar 
otros personajes. 

El programa permite al 
jugador incluir frases con 
toda naturalidad, como podia 
ser por ejemplo: «Abre la 
puerta rápidamente, sal y 
coge un taxi». Esto, afade 
un gran realismo a la acción 
principal, lo que, unido a la 
posibilidad de hacer 
preguntas, dotan al juego de 
una enorme complejidad. 

El juego comienza en el 
estudio de Holmes, en Baker 
Street, con Watson sentado 


BEM Corren rumores de que algunas de las principales empresas esparolas importadoras y 
productoras de Software tienen intención de mantener conversaciones con el fin de intentar, 

de forma conjunta, poner freno a la incipiente pirateria. 
BEE Dinamic prepara un nuevo programa que casi seguro Ilevará el título de 


«Profanación». El juego está ambientado en Egipto y más concretamente, en el templo de 
Abu Simbel. 
BEM Ya está en Espara una de las más espectaculares creaciones de Ultimate, «Khight 
Lore», un juego revolucionario en todos los sentidos. 





en un sillón leyendo un 
periódico. A partir de ese 
momento, todos nuestros 
esfuerzos han de ir 
encaminados a descubrir un 
horrible crimen, en un 
complicadisimo organigrama, 
donde las pistas aparecen y 
desaparecen continuamente. 
Hay un reloj que nos marca 
el tiempo transcurrido, 
indicândonos la hora, el dia 
y el minuto más próximo. 
Este dato es muy importante 
sobre todo si tenemos en 
cuenta que para coger un 
tren habrá que hacerlo a 
una hora en punto, ya que 
de lo contrario lo 
perderíamos. 

Para andar por el Londres 
Victoriano, que es el lugar 
donde se desarrolla la 
acción, tendremos que 
utilizar el Metro, los taxis y 
los autobuses. 

Los gráficos del programa 
ocupan tan sólo un cuarto 
de pantalla, sin embargo, 
están bastante bien 
construidos. 

Dentro del juego se 
producen continuamente un 
enorme número de posibles 
casos complicados, los 
cuales guardan un sentido 
de interacción que 
complican aún más la trama 
de juego. En este caso, al 
contrario que lo que ocurria 
en el Hobbyt, ni siquiera 
leyendo un libro con 
anterioridad hubiera sido 
posible conseguir un 
conocimiento exhaustivo del 
tema. 

El programa ha sido 
desarrollado durante 
dieciocho meses, y 
posteriormente tardó en salir 
seis en Inglaterra. A la vista 
de los resultados, ha valido 
la pena su realización. Está 
escrito en inglés, lo que 
puede ser un inconveniente 
más a unir a la enorme 
dificultad, pero viene 
acompafniado con un 
completo manual que 
contiene algunas pistas en 
forma de ejemplo. Al menos 
en Inglaterra. 
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Zo0 - SISTEMA 
DE INTERRUPCIONES 











Tal vez hayamos leído en o mm revista o libro, o 
alquien nos ha comentado algo sobre las 


«imterrupciones». Pero, é 


ué es eso?; «para qué sirve? 


y sobre todo ;cómo se uti ilizan las interrupciones? 


En primer lugar hay que explicar cuál 
es el concepto de interrupción y para ello 
nada mejor que un ejemplo: 

Supongamos que está sentado frente 
a su Spectrum programado (o más posi- 
blemente jugando a alguno de los jue- 
gos que esta revista publica) y, en ese mo- 
mento se oye una voz que nos grita des- 
de el pasillo: ;jLa cena está lista! 

Entonces nosotros atenderemos la «in- 
terrupción», es decir, cenaremos, y muy 
posiblemente, seguiremos luego con 
nuestra tarea, ;si no nos «desconectan», 
claro! 

Pues bien, el Z-80 puede atender a ta- 
reas que reclaman su atención, ejecutar- 
las y luego seguir con lo que estaba ha- 
ciendo antes. Y esto es lo que hace nues- 
tro Spectrum cuando por ejemplo, lee el 
teclado: cincuenta veces por segundo, el 
ordenador para lo que esté haciendo, lue- 
go lee el teclado y aumenta en uno el 
conjunto de tres bytes formado por la va- 
riable del sistema FRAMES y, después 
sigue ejecutando el programa interrum- 
pido. 


Dos tipos de interrupciones 

El Z-80 dispone de dos tipos de inte- 
rrupciones: una enmascarable y otra no 
enmascarable. Cada una de estas inte- 
rrupciones está asociada con una «pati- 
ta» del Z-80. Una interrupción enmas- 
carable es aquella que se puede desacti- 
var o activar a voluntad del programa- 
dor y esto se hace con las instrucciones 
DI y El respectivamente. Es decir, si en 
medio de un programa se pone la instruc- 
ción DI, a partir de ese momento no se 
atenderán las llamadas producidas por la 
activación de la «patita» correspondien- 
te. Las interrupciones volverán a atender- 
se cuando se ejecute la instrucción El. 
Una interrupción no enmascarable se 
atenderá siempre que se active. A partir 
de ahora, sólo tomaremos en cuenta las 
interrupciones enmascarables, que son 
las únicas que se pueden utilizar con el 
Spectrum. 
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El Z-80 tiene tres modos de ejecutar 
las interrupciones de las cuales el Spec- 
trum sólo nos permite utilizar dos, estos 
modos se conmutan entre sí con las ins- 
trucciones IMI y IM2. 

El Spectrum está normalmente en el 
modo 1. En este modo siempre se ejecu- 
ta una instrucción de RST 38. Es decir, 
como cada cincuentavo de segundo se 
produce una interrupción, esto hace que 
siempre se ejecute un salto a la rutina en 
ROM que comienza en la dirección 0038 
h., y es esta rutina la que se encarga de 
leer el teclado y de actualizar FRAMES. 

Veamos cómo se utiliza el modo 2. En 
este caso lo primero que hace el Z-80 es 
formar una dirección con el registro [ y 
con los datos que, en ese momento, es- 
tén presentes en el bus de datos. En el 
caso del Spectrum este último byte ten- 
drá siempe el valor FFh en ese momen- 
to. Luego, el Z-80 irá a esa dirección, for- 
mará una nueva dirección con el conte- 
nido de esos dos bytes consecutivos y co- 
menzará a ejecutar el programa a partir 
de dicha dirección. Por ejemplo: 


El registro I contiene el valor FEh. 
La dirección FEFFh tiene DOh 
La dirección FFOOh tiene 4Ah 


El Z-80 ejecutaría un salto a la direc- 
ción 4ADOh y retornaria al programa in- 
terrumpido, cuando se encuentre con la 
instrucción RETI (Retorno desde Inte- 
rrupción). 

Veamos un ejemplo de utilización del 
sistema de interrupciones en el Spectrum. 
El programa permite tener un reloj en la 
esquina superior derecha y la ventaja de 
hacerlo usando las interrupciones es que 
nos permite estar realizando otra tarea 
mientras el reloj funciona independien- 
temente. De todas formas hay que hacer 
notar que el reloj se parará con aquellos 
programas que desactiven las interrup- 
ciones, como por ejemplo, las rutinas de 
LOAD y SAVE, pero el reloj continuará 
después de terminada estas rutinas. Otra 
«pega» es que si hacemos NEW debere- 


A PERERA 





mos volver a inicianzar el reloj haciendo 
RANDOMIZE USR 65517. 
Las direcciones que interesan son: 


— 65426d ...... Aqui se alma- 
cenan los se- 
gundos. 

— 65427d ...... Minutos. 

— 65428d ...... Horas. 


Haciendo POKE en estas direcciones 
pondremos en hora el reloj. El reloj co- 
menzará a marchar cuando se ejecute el 
programa almacenado en la dirección 
65517 (rutina de activación). 

Este es el listado del programa BASIC 
que carga todo el programa: 


ese 
$ ELEnA "às “o pa do 


1FFF3FSESDSCS 
438326E 20 1836002334 3ESCBE 


ei 

eo 

eo DATA ER ap 
2B 

1 


8BE200236002194FF3E173290 


pr 


30 DATA “FF3EQACDSAFFE1 
eFF3EOACDSAFFE12BCDS2FFCID 


420 DATA “ED4ADESZEZEFF24DE 
BC6DASF7CESCDSAFFE17DCD6AFFE 


SQ DATA "07072195FF16005F1SE 
E bee 


q 


91 
12 
34 
ES 
ES 
Ei 
ZA 
1 


F 
3 
3 
C 
Cc 
F 
3 
Cc 


o) 
wo ro om am 


Oo 91 TA ue ou 


DATA "“1BFASASOFFICI2SOFFCIO 
coBdosago” 
70 DATA “"7ZCBACSCSCECEBA7COZDSO 


602020606027C3AV67ABCCOBS7C" 
80 DATA “7C3ADESAZAGESA7C82CEC 


OA OO O O OB ERACEBA? fo 


90 DATA CBSCOBCBACSBAZC7CIAD 
506020606027CBACEBABACGBATZC 

100 DATA "7CBACOBAZAG63A7COO181 
SO OLE LAGOsEFEEDATEDSECS" 

110 RESTORE 

115 CLS 

120 LET D=65279 

125 PRINT TAB 10;':4+++ RELOU +++ 
130 FOR I=1 TO 10 

135 READ AS 

140 FOR J=i TO LEN A$ STEP 2 
1SQ0 LET X=16+(CODE (AS(J))-48-7 
+ Dai dr E )) 

160 LET X=(CODE (AS(J+1))-48-7+ 
(ASCJSI) >" 9)) +X 

170 POKE D,X 

180 LET D=D+1 

190 NEXT JU 

200 NEXT I 

310 PRINT AT 20,0; “Puesta en ho 
ra“ 

220 INPUT “HORA “;H 

230 PRINT AT 21,0;H; 

240 INPUT “MINU UTo ";M 

250 

260 POKE ess26'6 | 

270 POKE 65427,M 

280 POKE 65428,H 

285 RANDOMIZE USR 65517 

290 PAUSE SO: CLS 


he 


DIR, 


ICODIGO 


FEFF 01 FF 


FFO! 


FFZA 


F3 


8 3 ves gse ses ss 
Ss 2 ss ge Sã 


EB 


SE 18 
BE 

20 02 

36 00 
2194 FF 
SE 17 


32 90 FF 


Es 


CD 52 FF 
3E OA 


CD 6A FF 


Ei 
2B 


ES 
CD 52 FF 


dE OA 
CD 6A FF 
El 


2B 
CD 52 FF 
C1 


ILISTADO 


RG FEFF 


0 
DIR-OM DEFW FFO1 
COMIENZO DI 
PUSH AF 


IMP 


PUSH HL 
PUSH DE 


PUSH BC 
LD HL, TIME 
ING (HL) 

LD A32 

CP (HL) 


JR NZ,IMP 
LD (HL),00 


“INCHL 


INC (HL) 
LD A3C 


CP(H 

JR NZ IMP 
LD (HL),00 
INC HL 
INC (HL) 
CP (HL) 
JR NZIMP 
LD (HL),00 
ING HL 
INC (HL) 
LD A18 


CP (HL) 


LD HLTIME+3 


LD A17 
LD (XPOS),A 


PUSH HL 


CALL COS 
LD AOA 


CALL CHR 


PUSH HL 





“Dirección de 
comienzo 


Guarda registros 


“Actualizar 1/50'avos 
de 


segundo 

:'Si no se ha Ilegado 
a 50 

ir a la rutina de 
impresión 


'Poner 1/50'avos a 
cero 
“'Sumar un segundo 


“Si no se ha Ilegado 
60 


a 

«saltar a la rutina de 
Impresión 

'Poner segundos a 
cero 


'Sumar un minuto 
“Si no se ha Ilegado 
a 60 ir 

;a la rutina de 
impresión 

poner minutos a 
cero 

“Sumar una hora 


:Si no se Ilegado a 
24 horas 
«saltar a la impresión 


'Poner horas a cero 

Cargar HL con la di- 
rección de las horas 
;Cargar XPOS con la 


posión 

“donde se imprimirá 
el 

“primer caracter 
iLlamada a la rutina 
de imprimir 

“el contenido de HL 
Impresión del signo 


Llevar a HL la 
dirección 
"de los minutos 


Imprimir el contenido 
de HL 


“Imprimir *” 


nLlevar a HL la direc- 
ción de los segundos 


nRestaurar el conteni- 
do de los 
registros 


“Rutina ROM de lec- 
tura del 

teclado 

“Retorno desde 
interrupción 

“Esta rutina primero 
para el 

“número binario con- 
tenido en 

'HL a un número en 
BCD, también 
«contenido en HL 





DIR. ICODIGO ILISTADO 
TE LD A, fe) 
26 FF LD H,FF Carga H con —1 
FF56 24 RO INCH e del dígito en 
D6 OA SUB OA más significativo 
30 FB JR NC,RIO 
C6 OA ADD A, OA 
6F LD LA “Almacena el resto 
ent 
TC LD AH 
E5 PUSH HL 
CD 6A FF CALL CHR od el contenido 
E1 POP HL 
TD LD AL 
CD 64 FF CALL CHR ld el contenido 
Ei POP HL 
C9 RET | 
FF6A 07 CHR  RLCA »Multiplica por 8 el 
contenido 
07 ALCA “del acumulador 
07 ALCA . 
2195 FF LD HLCARO “Cálculo de la 
| dirección 
16 00 LD D,00 «del primer byte del 
5F LD EA «carácter a imprimir y 
almacenar 
19 ADD HL,DE sen DE 
E5 PUSH HL 
D1 POP DE 
3A 90 FF LD AJXPOS) Cálculo de la direc- 
ción de 
6F LD LA atributos 
26 58 LD H,58 
36 38 LD (HL),38 :Poner INK negro y 
PAPER blanco 
26 40 LD H,40 
06 08 LD B8 “Colocación de 8 
bytes consecutivos 
FFB2 1A ET1 LDA(DE) ;a partir de DE en la 
717 LD (HL),A pantalla 
24 INC H 
13 INC DE 
10 Fa DJNZ ET! 
3A 90 FF LD A(XPOS) la la posición 
C INC A carácter a imprimir a 
32 90 FF LD (XPOS)A continuación en uno 
C9 RET 
FF90 00 XPOS  DEFB 00 Dirección de pantalla 
se imprimirá el 
próximo 
«carácter 
FF91 00 00 00 00 TIME DEFB 00 00 00 00 ariables del tiempo 
FF95 7C BA C6 C6 CARO  DEFB7CBAC6C6 | ;Definición de los 
C6 C6 BA 7C C6 C6 BA7C caracteres 
02 06 06 02 CAR1  DEFB 02 06 06 02 
02 06 06 02 02 06 06 02 
TC 3A 06 TA CAR2  DEFB 7C 3A 06 7A 
BC CO B8 7C BC CO B8 7C 
TC 3A 06 3A CAR3  DEFB 7C 3A 06 3A 
TA 06 34 76 TA 06 3A 7C 
82 C6 C6 BA CAR4  DEFB 82 C6 C6 BA 
TA 06 06 02 TA 06 06 02 
TC D8 CO BC CARS  DEFB 7C D8 CO BC 
TA 06 3A TC TA 06 3A 7C 
TC B8 CO BC CAR6  DEFB 7C B8 CO BC 
BA C6 BA 7C BA C6 BA 7C 
TC 3A 06 06 CAR?  DEFB 7C 3A 06 06 
02 06 06 02 02 06 06 02 
TC BA C6 BA CAR8  DEFB 7C BA C6 BA 
BA C6 BA 7€ BA C6 BA 7G 
TC BA C6 BA CAR9  DEFB 7C BA C6 BA 
TA 06 3A 7C TA 06 3A 7C 
00 18 18 00 CARD  DEFB 00 18 1800 
00 18 18 00 00 18 18 00 
FFED 3E FE ACTIVA LDA,FE 'Rutina de Activación 
ED 47 LD |, “Carga | con la 
dirección 
«de la interrupción 
ED 5E IM 2 “Modo de interrup- 
ción 2 
C9 RET 


MICROHOBBY 23 


PROGRAMAS DE LECTORES 


OLIMPUS GER 


Jorge MARANON 












anne a 12,€4 AT 16, pata 
2,Cc,P 
e * o + , o A 
e K (RN as EE 
Situémonos en la antiqua Greca cuando las Olimpiadas  Z./S55: &)" 17 b451+8/55 
e . 30 IF v=20 THEN GO TO 12000 
convulsionaban a sus habitantes creando un ambiente (d6 TE INKEVSSTICÓTMEN LET c=6 
* | 
de expectación que ha Ilegado hasta nuestro dias. é1 JF INKEYS="2" THEN LET c=12 
seia A 42 IF INK - THEN LET r=18 
Como entonces, la misión del atleta será transportar la EE A ida = 
e .. o qt 43 Tr INKEV$="4" THEN L ra 
antorcha olímpica hasta su ubicación definitiva. DO BU a caia DERA 
áciay, ión hã d E ció divinidad PRINT ATO Oi INK S, PAPER Q;n$ 
m Pero 3 hi 1 1º r 
EST ema Sa f, 4 Ve DEICHAS ' Nuestra o rn na ERAS S2 REM qrafiCos+r+rIrrrRHE AH A++ 
se a una prueba adicional: la amenaza rá la de atinar y destruir al esforzado 106 ATA E> só da, 2s 291, EX ta 
de los dioses, en especial del dios Zeus atleta antes de que logre su objetivo, pa- e AS tapa to ai MSL LadaE, 18,17, 
: x k + . 1a DA 13 183 136 ,12020,2,6, 
(nosotros) que, enfurecido, no cesará de ra lo que contamos con quince rayos im-  , 54, 20.36.38 
enviar rayos para destruirle. placables y con cuatro mandos para eje- 0188 ,86,6 csBstsdo sá no 150, “Bus a 
: s'25$,2 ões 
neta, Dae 150 ERRA es 
“140 DATA 31,938 184,145,165,6 9,6 
S4,n. NEXT y: NEXT n: PRINT AT 2 ER RGE da E : 
a RO SUE 188. E8 18º 470º Q,15, INK 9; “ALCANZADOS “+STRS$ 5 1a" DATA 120,90 230,210, 89,32,1 
o LET CcC=31:' BORDER O o 16,32,64,60,6,30 8 
4 LET w=w+1. IF w= 15 THEN GO pm ho Í é RE ó , 14 14, 
TO 3060 -'S FÓR n=16 TO 18. PRINT AT n, 4 STÓRE 
S FOR n=7 TO 17: PRINT AT nf c, NEXT n: IF s=10 THEN G0 150 POR n=6 TO 119: READ q: POK 
» INK 6; PAPER O; BRIGHT 1,' Po TO 6000 REM fan a E USR “a“+sn,q: NEXT n 
4exCno' POR no1 to S: BEEP'.OOE, 10 BORDER 2: GO TO 5 160 RETURN 
-12: BORDER INT (RND 47) PRINT 11 LET w= LET v=0: LET 5=0.. 200 BORDER O: PRINT ns NK 
T 18,r; INK INT (RND+6) +1, "6$" 8 c6zdha E TaBdeo PETaiça PSC 7; P R 
N No PRENTAT 19, “A DET K=INT (ANDES) 410º IF K=2 Em ! 3 " 
THEN LET c=c-1 oS PRIN 8, PA 5" 
15 LET Cc=c-l; IF c<=-1 THEN PR “a 
INT AT 168,0; LET cez3T: EEY T 20,0; 
07h Ri aa 174 AT 2o 5: PTN y 
O, PAPÉR 7; BRIGHT 1, "ESTADIOS “ po SRS ATO és 0 INK 7 PADER 
: 
7 BORDER O: GO TO 15 16 IF jz=1 THEN LET a$g=" 8" LÃ Rm “= ENK 75 PAPER 
é Pepê O, Cloloniio ro por uefooiaç do Treat ercçro jo data a a 
P -S FOR 4=1 es: O R = A - = N 
Ur 254,4: BÉEP .008,041.5: OUT & LET J=i it PRINT T 21,0; Rbranon 
19 é 
230 RETURN 
3200 PAPER O: BRIGHT 1; CLS 
Re Ea AT 2,15; INK 6,“0 L IT 
316 PRINT AT 4,0, INK S,'“Los di 
oses y en especial et dios FEUS 
estan hasta el cogote de tas OL 
impiadas Y han decidido estrop 
sap has (as tdi aa0Ga? GgBS Mc, 22 8€ 
o [a] m * y a 
317 PRINT AT 10,0; INK 6; "Los r 
ayos se disparan con Las tecl 
as 1-2-3-4'"; AT 16,0, INK 4;"dis 
pone el dios Feus de solto à5 ray 
doa haboRõoo: Gs 
1220 FOR n=1i TO 28: BORDER 6: BE “ 
EP .01,n+10 BEEP INT (RND+3) 710 
E (RNDES o: BEEP .01,n+3: BOR 
1100 PRINT AT 12,0, Ink 3, BRIGH 
) 1;“"ElL mensagero olimpico ha Êo 
dido mas ve tos dioses",aAT 1 
S; BRIGHT di; FLASH 1, INK 4, PRÊ , 
o OLIMPIADAS! 
1200 PRINT AT 20,0, INK 7, FLASH 
is"pulse enter para otro vego" 
à, FOR n=1 TO 800: NEXT n: PAUSE 
Shes POR Bah 0d: EP 10R-016, 
RIGHT - FLASH L;/:" SE  ALABARON' LO 
S RA rrbs" 
310 


[ra] “PRINT AT 14,0; INK S;"pulse 


ter para otra carrera”: FOR n 
a bo NEXT n: PAUSE O: CLS 


e 
1 
200 FOR n=1 TO 10: BEEP .01,n: 
EEP .008, INT (RND+30) - BEEP .01 
n+10: NEXT 

100 PRINT AT 12 INK 3; PAPER 
7 ent 1 

2 

: 

Ê 

3 


; FLASH 1; sia “Los diose 

han vencido 

20 PRINT AT. 18,0, INK 7, FLASH 
A a enter para otro intent 
- FOR n=1 TO Re NEXT n: PAU 
O: CLS : GO TO 


DO ne rd Mo 





22 PRINT AT 20, o! INK &; BRIGH 
1, FLASH 1;“pulse enter para O, 
ra carrerita ": PRUSE O: CLS : 
UETOMs ' 
<L 
EL 
us 
[a 
uu 
a 
< Cas 
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E” PROGRAMA DE LECTORES 


“CASERA 


INR 
Pedro VALDEOLMILLOS 
MARGALEF 


Con este pra 
tendremos al dia 
todos los movimientos 

» económicos de la casa 
y podremos saber 
EXACTAMENTE, en qué 
se nos va el dinero. 








Para comenzar, y después de pulsar 
una tecla, el ordenador nos preguntará 
el saldo del mes anterior, si lo hubiera, 
si no, pulsaremos cero. 

Nos preguntará, igualmente, los datos 
que vamos a introducir, y una vez dados, 


pulsaremos ENTER. Otra información | 

a pedir será el número de códigos que Premiado con 15.000 pts. 
existen. Aquí debemos tener en cuenta 
que, por razones de espacio en pantalla, 


JH BALLESTEROS 


à + 10 INK O; BORDER O; LET printe e50 LET E ECO SAGA “Cons am 
palabras tales como electricidad o gas, ao: LET Printerdoo von ô atdos: BR Tone Nisatas CENSSTRO 3 
por ejemplo, no están incluidas en el pro- 28 PRUSE 45: PRINT 81;", (E di CINE ng” ZE LEN h$.26 AND“ 
grama. Debemos ser nosotros quienes de- EO ER 4. FLASH O. BRIGHT O 5258? - = 8 
E : . Pera 274 IF h$="cc” THEN LET saldo=s 
finamos una tabla de códigos, (por ejem- ter o route tisanto  BAUSE amo aldo-cant: LET cin,codig)=0. PRI 
anterior?"'saldoa 18 
Ci 105 LET saldo=saldoant: LET can NT OVER Q,AT od: BRIG 1º PAPE 
plo, electricidad:1; gas:2). Una vez hecho t=0 R6;" "AT y,7; BRIGHT 1; PA 
: - e , 110 INPUT AT 0,0; "“Cuantos datos PER 6, ;1RT,| 4,10, BRIGHT 1, PA 
esto, introducimos la cantidad o núme- vas à introduciro-nundatos: IF Eabtn ou MPa gado, ORIGNT A 
A É ; numdatos= E , / J , 7164 
ro de código que nos ha salido, siempre 115 PAUSE 20: INPUT AT 0,0; Cua ao dy PAPER 6 e TO A 
; ntos codigos existen? "a: IF a= a ze SER SEN UR RERU 
que no exceda de quince. 2,20 DIM ctnundatos,a) DIM dt(a+ 0 NEXT n: IF printerei THEN G 
” El paso siguiente será rellenar la tabla Lc eopbER 4 oBY | Tião E 
Im 1320 FOR n=zi TO numdatos: FOR m= 290 FOR n=1 TO a FOR m=1 TO nu 
del movimiento, para lo que el ordena- 1 TO a: LET cin,m)=0: NEXT m: NE mdatos. LET d (mn) =d cn) te tmn) - NE 
.: ” » XT mo NEXT Nº d(a+l)=sa [a 
dor nos pedirá la fecha (tecleamos el nú- “54 BORDER O: PAPER O CLS 320 INPUT “Final, para seguir, 
: aê 135 PRINT HO; '“Querras copia por CENTER q TN és 1 
e mero del día del movimiento, pulsamos impresora de, la tabla del movi 31º BORDER 1: PAPER S. CLS PL 
” . miento: s/n a a 4 : ps 4 ; a , 
ENTER y nos aparecerá el signo “/” y (ige ir INÉEVSc) 18" AND INKEVSC DaaylTêso,O: DRAÚ O, 7373, co 
] [= . a ; 
de nuevo el cursor. Tecleamos el número ARRECADA tato base VEL LSDASE US Aa 
N ter = is . 
s de hacerlo, quieres rea- Liza 
del mes y otra vez ENTER). 150 FOR N=1 TO nundatos a E as Ed hi cinh 
: a . “as: =1 THEN = € todos los codigos y Ss Cor 
A continuación, nos pide el código, 128 IF n-i9 OR nz50+2-Dr n=2049 espondientes totatess"! -*“Buísa 
- as OR n=20+4 OR n=20+ n=20:6 O HA) Seda 1 Lar 4 Ra am 
que teclearemos para imprimirse en pan- R n=2047 OR n=2048 OR n=2049 OR 330 IF INKEY$<>"s“ AND INKEY$:> 
. . . n=20+10 THEN CLS , GO SUB 4090: “nº” THEN GO TO 330 
talla. Luego nos pide si la cantidad es ex- LET SFB: ri lida THEN COPY oG4? IF INKEY$="S" THEN GO SUB 3 
1 664?? 1 ' em” =ô: INPUT Introduce Ff 345 CLS PLOT 12,1: ORAU 253,0: 
traída (“d de debe) o introducida (“h echa (DO Mm) BUERR DE a .DRAU 6,175: DRAII/-255,0: DRA O 
de haber). Finalmente, el ordenador nos 156 IF €>15 THEN GO TO 286 “350 PRINT “'“ Fase de grabacion 
é : E ) e 7? NT AT y,1+(2-LEN S À a rinua L 
pide la cantidad y ya se encarga él de im- BRIGHT ds Pin ZiiAT GTA (B-LEN ictoacagues a contintacion da 
nas . T 1; BRIGHT 1,e : E er 
primir tanto la cantidad como el saldo dijo INPUT CCodigos ricodig: IF Ra eu oi MAS CN 
. codig>a THEN T '“" Recuerda que este 
anterior. 4125 PRINT BT 9,75 (2-LEN STR$ co TOLO TO debe sobrepasar Lo 
, 19), , > s 10 carac- teres,” 
- O INPUT “DEBE o HABER?” (d/h) 1 ta 
Una vez aquí, el ordenador nos orde E: CINE ds TF LEN 9951 THEN O «378 RRUSE 30 ERROL so 15º Re BN 
na que pulsemos «ENTER» y elijamos [196 IF dserd" THEN LET t=io: LE e$=0 THEN GO TO D00 o EL tt 
: : . . s=1: RR A 
entre tres opciones: pulsar ENTER, con 200 IF d$="h” THEN LET t=17: Go VAR e qd NOM dd GREREEVA 
lo que pasamos a introducir el siguiente bos 68 TO 480 ao AU JA CRER a 
CSS . 210 INPUT “Cantidad” "“;cant IF NT " Bien, ahora rebobi 
movimiento, quedando fijados los datos cant>999099 THEN GO TO 210 nad pulsa Une AEclo Cura var 
: é 222 PRINT AT y,t+(t6-LEN STR$ ca ificaro." 
que acabamos de introducir; pulsar «cc» 1 RICH ho caldo=saLdo 426 PAUSE O: QUER O: PRINT AT 1 
. . + = ba es TAS + N 
h -cant: LET cant=-cant GO TO 250 “AT 410,43“ 
ipi pg que es la opción 240 LET saldo=saldo+cant q à ": QUER 1: PRINT AT 1 pr 
e paro o finalización. 
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IVESON 
SOFTWARE 


COMUNICA 


Lamentamos el desconcierto que entre los usuarios de Sinclair haya oca- 
sionado el Aviso aparecido en el N.º 7 de esta Revista, acerca de los pro- 
gramas supuestamente «piratas», realizado por una Empresa de Software. 
IVESON, apoya y se une a cualquier iniciativa que critique acciones des- 
leales o ilícitas y recrimina a aquellos desaprensivos que ilegalmente «pi- 
ratean» programas, ofreciéndolos al mercado en condiciones anómalas y 
a precios muy por debajo de lo que la libre competencia admite. 
No obstante, estamos en total desacuerdo en lo referente a calificar de 
programas «piratas» a aquellos que por una mejor gestión comercial se 
ofrecen al usuario a precios más asequibles. 
Afortunadamente, en este país existe libre mercado y la competencia es 
perfectamente lícita. 
En IVESON software, nos dedicamos a la venta de programas —por su- 
Ran originales— y no a la venta de estuches más o menos sofistica- 
os. 
Por el gran respeto que nos merecen los usuarios de Sinclair, nos esforza- 
mos dia a día para ofrecer los mejores programas al mejor precio relación 
calidad y aceptamos de buen grado la competencia. 


iINO TE FIES DE LAS APARIENCIAS! 
ICONTRASTA LOS PRECIOS! 


IVESON software - Riera de Tena, 15, Tda. 4 (Pje.) junto estación Mercat Nou. 
Telf.: 249 31 96 - 08014 BARCELONA 





E PROGRAMAS DE LECTORES 


uma TAB 2+(2-LEN STR$ n);,n; 
o se VERIPY ES DATA dO 3020 LET grão. LET gi0-i46. LET 
430 PRINT AT 20,0;'' Todo correc x20=154 F d(n)<O THEN LET q=11 
to. Fin de progc rama.” LET x20=58 
2999 STOP : STOP 3030 PRINT TAB = hd ri ÃO, STR$ dg tin 
3000 BORDER 1 PAPER SS: CLS PR 1),ABS dêin): PLOT 34,410-(n+8) 
INT AT Q,0e; ANDRES E ao a Aa oRAU x20+((S-LEN STR$ ABS d(n))+ 
MPB ACION TOTAL de F 

aSOMPROBÁCION DEBE 30420 NEXT n PRINT PRINT OVER 
HABER “ PRINT 1;TAB 1+(2-LEN STR$ a+1);3+1; TAB 
3005 PLOT 1,1: DRAU 253,0 DRAW 2+(7-LEN STR$ saldo);saldo PL 
2,165. DRAU -253,0: DRAU D,-165 OT 34 ,410-((3+2) +83): DRAU 154 +(1 
3007 INPUT AT q, Q;' 'Querras copis S-LEN STR$ d(a+1))48),0 

impresa de la comprobacion? 5045 IF printer2=i THEN COPY 

(s4n) ta EINE PMS IP + ida 3050 INPUT “Final comprobacion, 
AND p$g<>'n' THEN GO TO 3007 neo =: RH = dida E LINE 1S$ RETURN 
3005 IF p$='s'' THEN LET printer2 40534 


=1 e 
3010 OVER 1: FOR n=1 TO a: PRINT 4090 REM CREACION PANTALLA 





4091 

4092: 

4095 BRIGHT 1: PAPER 6: BORDER 6 
CLS BRIGH a 

s200 PLOT Q DRAU 0,171: DRAW 

61,0: PLOT 184, 71: DRAW 61,0: D 

RAU 2,-17 

S210 PLOT 0,165: DRAU 255,0 

S220 PLOT 0,147: DRAU 255,0 

S230 PLOT Sê,0: DRAL 0,147: PLOT 
76,0: DRAU 6,147: PLOT 132,0: D 

RAUL 0,147: PLOT 188,0: DRAU Q,14 

5040 PRINT AT 0,5; OVER 1; BRIGH 

T 1, PAPER GS; “"TÁBLA MOVIMIENTO” 

S060 PRINT AT 2,1; BRIGHT 1; PAP 

ER &; OVER 1; “FÉCHA CD DEBÊ H 

ABER SALDO” 

S070 RETURN 





CARRERA DE VALLAS 


Adolfo ESPINAR 
Er 


a dE? Como auténticos atletas, 
 descubriremos con este 
programa, la pasión de la 
| <ompetición en la que nuestra 
“Única meta será la de superar, 
lo mejor posible, las pruebas 
' correspondientes. 


ds tenemos que enfrentarnos a 
un largo recorrido salpicado de vallas que. 
deberemos saltar con el menor número 
de faltas posibles. Para ello, podemos 
pulsar cualquier tecla y ponernos en mo- 
vimiento, y pulsar «O» para saltar los 
obstáculos. 








INK 7: DRAU 255, 





Como dato a destacar, recalcar que la 264 ie pi a DE ion 
: pose SE - DRAW INK 7;255,0 
cuarta rutina va en código máquina pa- 7 28: “Sta def ; 255,0 
ra conseguir el scroll del primer tercio de A 2,0, 0,131,0,14 
40,11 “04 159749 1,1 
pantalla. é2,48,650,4,1,456 , 196, 96 244655 96,1 
92,128,224 
«35 DOTA 0.0,12,4,9,0,64,00,0,1 
NOTAS GRAFICAS 3/14/0560 6 254 96/48 É ap 2,6,6 
“34 DATA 0,0,0,0,1,2,4,1,0,14,1 
4,14,240,112,224,2924,3,3,3,3,3,1 
5,7,5,24 ,128,192,192,126,6,60,19 
“ 36 DATA 0,0,12,4,3,0,64,99,0,1 
4,14,14,240,113,254,194,115,61,3 
0,14,0,6,0,6,246,246,13,7,3,0,6) 
38 DATA 2:57,33,93,933,33,1,1 
39 DATA 0,0,0,0 126,4 ,2,456 
- Eb x 40 DATA des! 45,203,95,155,55,4 
á DATA 6 2 q: 
$,197,1,31,6,26,2537,176,43,119,0. | 
,35,36 1524942 16, RECAS 20 84*º 
é RÉM papeis Dash da nd Le ico ESP PN 
— 6 DIM 5$(5,10): LET S$(4) =MA 
SHO SOY!": LEÍ s$(S) ="VALE Tão!! 
". LET s$(1)="YUUPII..!!”: LET 3 
S(DT="VICTORIA!!”. LET s$(3)="LÔ 86 PRINT INK 1;AT 6,B;US;AT 5, 
6 BRIGHT O: BORDER O: PAPER O =! '8 a - K 7: PAPER 

iês E 

11 gp PAPER — AMBIO DO RO SPP NPR RO DO Re Te 
PRINT OABER SU! Loro ras aaa no EM ae (3 e): L 

PRINT PAPER É, ,))) ET a=0: K$(1) =" LE aco 

12 CIRCLE 75,110,36: ÉtÊCLE 12 Jet” CET K$(3) ever: CET qs(1 
adio,30-. CIRCL E 1é5,11 0,38. CIR E ç LET as efe: EF a 

j="A: LET n j=0: 

Ta E TRCLES Ss, 110586: “e SaCUE Lo S “0; MRI) nes Lit cho 
9.110,28; CIRCLE 165,110,28: CIR 121 PRINT AT 8,0; PAPER 4,,,, 
CLE 160 /28: CIRCLÉ 146,70,28 1320 REM ds DU DA df 

Le PRINT AT 19,5; BRIGHT 1; PA [142 PRINT AT 17 INK 0," Uia 
PER 6, INK 2;"E L RE DO 18,8; "a PAUSE o: BEE. s,-2 

RiiBr. 21,9) SOR TUARE A A.Espina “BASAT AT 412,6; “LAT 46,6!" 
r .. 

20 PAPER 3: CLS : BRIGHT 1: CL 190 LET t=t+1: LET nen+1: IF n> 
Ss > BRIGHT 1 =4 THEN LET ne=1 

21 PRINT AT (1,10; INK 9;"Para 195 LET cm=USR 64000 
saltar pulse q” 200 IF INKEV$<>"0” AND j=0 THEN 

25 PRINT PAPER SS... EA PRINT AT 17,8; INK B;k$ÍN):AT 1 












3,8; INK 6;q$(n): IF n<>1 THEN B 
EÉP .002,20 

10 IF ÍNKEVg="0" AND (c(=12 AN 
DOc)=7) TMEN DEEP .04,1: LET tal 
xo LEME “Ent 

220 IF j=1 THEN LET h=h+41 

230 IF h<2 AND j=1 THEN PRINT A 
T 18,8;" “:AT 417,8; "AT 16,8 
; INK O; "ns tS AT 19 8; INK 6; AS 
235 IF h>2 THEN LÉT h=0: LET j= 
o: PRINT AT 17,8;” "“;AT 16,8;' 


240 LET r=INT (RND+2)+1: IF r=2 


THEN LET a=1 
eS0 IF a=1 THEN LET c=c-2: PRIN 


CRT ÀS C;os+. : TE c=0 THEN Db 
RINT.BT “2656 "; LET c=30: LET 
= ' + 


260 IF j=0 AND c=8 THEN pp A 
” APT EE 8; a 
INK QUER 1; (mpi. fe Et 

: e É +1: 

: 7 ENK 2; PAPER 2; 
tas ";f: FOR s=1 

PRINT AT 18,8," * 
N GO TO s8e 


INK 


1 
a 
HE 
NT.AT 2 2:"4 
; RI ND = 
“aa: prot? Bda INK 7º 
n=0: FOR d=8 TO 27 
n=n+1; IF n=3 THEN LET 


NT AT 17,9; INK O;" "4k 
8,d; INK 6;" "+qg(in): B 


ná 
h=1 TO 20: BEEP .os, 

ha PRINT AT 2,0; uINK O; (AP 
“META a ii 


PRINT AT 4,0, INK 9, PAPER 
Y SU ALEGRIA ES INCONTENIBL 


40 LET na=INT (RND45)1+1: LET n 
FOR 5=1 TO 20 

Ss LET n=n+i 

5 IF n=zá THEN LET n=1 

so 

I 


“pr»90DrHOOM ZDnhth 


NDNASS: --s 
DXneM Apm 
S gs 


-“0M: 
if 


PRINT INK O; PAPER 7; FLASH 

RIGHT 12;AT 14 20;s$(h3) 

PRINT AT. 16,28, INK o 
as (nm) SEÉP .3, INT RUDE 2 


PRINT AT 18, 28;" “+; INK O 
NT AT 16,28, 61h) AT 17,28; 
S,ag(n) “BEép 3), 


B 
N 
6; 


AN a 


e, (si 
AZON-ZONeEUNnaSU 
NxX0(A 

er] 

Z- 

m 

WE 

4 

C. 


ERECERSES; 
MICROHOBBY 27 





PABLO 


— a 





tio PROGRAMAS DE LECTORES 


SKI ACUATICO 


José Vives Montero 











EE E 
Ta E ae 
OR 
XT * 
ER 





E ES om np 
MEZOREED” 
TENS 
HEMP AÁA. 
EE E UN n;/cm 
EO Z EO 
EEE E 00/44 UHE E 
EEE 2072/008- EEE 


A pesar de la época que corre, seguro que a muchos de 
nuestros ledores les gustaria sentir la brisa de la 
costa, mientras disfruta del agua y el sol en un 


apacible paseo acuático. 


Esta es, en sintesis, la trama de este 
nuevo juego que presentamos a continua- 
ción, en el que, una vez más, tendremos 
que demostrar nuestra habilidad. En es- 
ta ocasión, con skis incluidos. 

Situémonos cerca de una costa cual- 
quiera, donde disfrutamos practicando 


10 RANDOMIZE O: GO TO 6000 

198 OUT 254,7: OUT 254,23 

110 LET 0=0+1 

120 PRINT AT 0,25;0 

130 IF o/1000=INT (0/1000) THEN 
GO SUB 3000 

140 PLOT OVER 1; (9+8) +4,8: CRAU 
QUER 1; (124) -(948),103 

180 POKE 23200+9,9 

190 LET 9=9r (INKÉV$=11" AND 9>1 
+ (INKEY$="0" AND 9429) 

200 POKE 232200+9,15 

210 PLOT (945) +4,8: DRAW (124)- 
(gãô) 103 

20 LF h=1 THEN GO TO 500 

230 IF i>7 THEN PRINT AT - 
APER 1; 

240 LET izisti: LET 94=j)-L7/10 

280 JF ix? THEN PRINT AT 1,5; O 
APER a 


Lit 
260 IÉ i>)=20 THEN GO SUB 1000 
290 IF h=0 THEN GO TO 100 


300 IF, i27 THEN PRINT AT i,k; P 
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nuestro deporte favorito, mientras inten- 
tamos esquivar todos los obstáculos que 
se interponen en nuestro camino. 

Para hacerlo y concluir con éxito el re- 
corrido, contamos con dos mandos, 1 y 
0. Suerte. 


4: LET k=sk+L,/10 
HEN PRINT AT i,k;, P 


+ 

- 

Q THEN GO SUB 1050 
au 


2 
1 
HEN GO SUB 20do 
AT 20,5; PAPER 1; * 
INT (RND£-7): LET j=1 


INT (RND+2) 


<k THEN GO SUB 2000 
T AT 20,k; PAPER 15" " 
i=INT (RENÓs-7): LET k=1 


T h=INT (RND+2) 

RETURN 

BEEP .2,3: BEEP .25,6: BEEP 
4: LET mz=m+1 

PRINT AT 20,12;M 

IF m=3 THEN FOR n=1 TO 10 
T 254,7: OUT 254,23: OUT 25 
OUT 254,120: NEXT n: GO TO 


Q RETURN 


D 


PROJOS O: 906 59699 SSOÚLUTUN 


S9-- cm 


PROG QUNPO Dergpumyp 
SS 999 SUSG6 SNGUSDOS 
PP OTHADOO CoHoHeno 


2: 
4 


VOA Pro mePMPRRRRnRpH 


FL. FRONTRAN 


NOTAS GRAFICAS 


A E 
Vw 





5000 RANDOMIZE USR 31492 
3005 GO SUE 4000 

3010 LET L=1+1 

2020 LET f=f+2 

3030 PRINT BO;TAB f;l; 

3040 IF lL=S5 THEN GO TO 3500 

3100 RETURN 

3800 PRINT AT 4,12; FLASH 1; INK 
>, BRIGHT 1; CAMPEON ” 

s1 I AT 2,12; FLASH 1; “EE 

+ 


AT 6,12; FLASH 1," *B+ 


SEIS 

“e DESO 

O :D :D 
HM 

= 

+ + 


Caco e Co 
Ud 
oo 
6) e 


GO TO 3590 
4200 RESTORE 9500 
4210 FOR n=p TO 7 
42020 READ às 
NT, AT n,O; INK 4;a8 


«250 O du da 
4260 aaa T 7,15; PAPER 5," de" 


o R RN 
5000 CLS : IF 0>hs THEN LET h$=0 
; "HAS RECORRID 


pp 
9S 
EE 
99 
ZU 


5010 PRINT AT 18,3; 

O ",0,” METROS"; ÁT 15,2; "MAXIMO 
RECORRIDO “;hs;* MET : 

S020 PRINT ÀAT 21,3; " JUGAMOS OTRA 
PARTIDA (s/n)” 

se30 IF INKEyY$="" THEN GO TO 583 

5040 IF INKEY$<>"S" THEN RANDOMI 
ZE USR 

S0so GO TO 7000 

E000 FOR n=144 TO 146 

6010 FOR n=8 TO 7 

6020 READ O 

6030 POKE (USR CHR$ n)+4m,0 

6040 NEXT nm: NEXT n 


- T 
6050 DATA 2,0,3,3,1,59,29,14 
6060 DATA 0,0,128,128,0,184,112, 


6970 DATA 8,20,34,127,0,66,231,2 
1 
E100 LET hs=0 
6190 FOR n=31492 TO 31512 
6200 READ a: POKE n,a 
6210 NEXT n 
6220 DATA 6,255,197,62,6,6,206,2 
11 S4,245,241,16,256,61,32,245,1 
53/16/239,201,20 
7260 BORDÉR 6: PAPER 1: INK 7: €C 
7010 LET a$=". 
7020 FOR n=0 TO 7 

5030 PRINT AT n,0; PAPER 5S;as 
2040 NEXT n 

2050 FOR n=8 TO 21 “ 
080 PRINT AT n,0; PAPER 2; INK 
6: FLASH L;“m;AT n,34; "me 
72870 NEXT n 
7090 PRINT AT 0,18; PAPER S; INK 
7; "METROS =0" 
“iba PRINT AT 0,5; PAPER S; INK 
2: "FALTAS =0" 
2110 PRINT AT 4,0; PAPER 5; INK 
4; +. 

1 INT AT 5,0; PAPER S; INK 





p=) 


6,0; PAPER S, INK 


7,0, PAPER 5, HS 


7,15; PAPER Sia de 
4: “CIRCLE 230,15 


LET e=0: LET f=13 
8040 LET 9=15: LET h=INT (RND+42) 
8050 LET 1i=8: LET j$=15: LET k=15 


8960 BEEP .,.3,-4: BEEP .25,-6:. PR 
INT HO; "NIVEL (1-4)=""; 
8270 LET L$=INKEYS 
8080 IF L$=''" THEN GO TO 3070 
s l a OR: 185"4" THEN 60 
E “4 L$ 
E G;TAB Fl 
E LET p= 





9998 INK 7: PAPER 5 
3999 GO TO 100 





revista de radio control y modelismo 


meses 


VOS 
todos sa Una revista que todos los 
meses le informará de las 


=. principales competi- 
e “. ciones nacionales e 
" internacionales, 
novedades del 
mercado, prue- 
bas de produc- 
tos comerciales, 
E fo planos para que 
é; Vd. construya sus 
/; propios modelos, 
novedades del mer- 
cado, pruebas de 
LA “productos comercia- 
4 les, así como una se- 
“ rie de artículos técnicos 
“Re escritos por los mejores 
especialistas. | 
) | | 
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HARDWARE 











Primitivo de FRANCISCO 


EL CONECTOR 
POSTERIOR DEL SPECTRUM 





“Queremos con este capitulo, a modo de preámbulo, que 


"Au ne peo daros la situadón de cada una 


e las salidas 


tá el conector posterior, así como su funcionalidad. De 
p ESK este modo, nosotros esturemos más seguros de que los 
—tircuitos le funcionarán a la primera sin mayor 
inversión de costo y de tiempo y, por supuesto, sin 


artículo como auxiliar de los montajes que ya se 


a " dariar al Spectrum. Le rogamos mantenga próximo este 


e 
avecinan. 
q 1 
| 






En la parte posterior existe, como sin 
duda Vd. ya conocerá, un conector alar- 
gado que es, en sí, una simple prolonga- 
ción del circuito impreso que contiene al 
microprocesador, memoria y demás apa- 
ramenta lógica. 

El conector es del grosor de la tarjeta 
de fibra de vidrio, y dispone de doble ca- 
ra con 28 terminales dorados por cada 
cara. La cara superior se denomina CA- 
RA «A» coincidiendo ésta con la cara del 
circuito impreso en que van colocados fi- 
sicamente la totalidad de los 
componentes electró- 
nicos. La cara 
inferior es la 


e CONECTOR CARA A 
| (CARA DE COMPONENTES) 
« 


TERMINALES 
ELECTRICOS 
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CARA «B», coincidente con la cara de 
pistas del circuito impreso. En esta cara 
no se halla ningún componente. La nu- 
meración va de derecha a izquierda, vis- 
ta por el lateral posterior del aparato. Di- 
cha numeración va del 1 al 28, por tan- 
to, la cara «A» se numera entre el 1A y 
el 28A y la cara «B» entre el IB y el 28B. 

En el punto del conector número cin- 
co, existe una hendidura en el circuito im- 
preso que ocupa la totalidad de los con- 










o - 
sema ; EA : E ra cocos aa SECCION DE LA TARJETA 
o o DD» [3 DE CIRCUITO IMPRESO 
D = O q mo ow 


HENDIDURA INDICE 
EN EL CIRCUITO IMPRESO 


tactos SA y SB. A esta muesca o hendi- 
dura se le denomina con el nombre in- 
glés de SLOT, nombre que encontrará 
con frecuencia en muchas de las publi- 
caciones que existen sobre el Spectrum. 
La muesca sirve para indicar la posición 
del conector hembra e impedir que se co- 
necte girado 180 grados; para ello, ha de 
existir en el conector hembra un diminu- 
to tabique de plástico alojado en el ter- 
minal número 5 y que se insertará en la 
hendidura del conector del Spectrum en 
el momento de la conexión. 


Atención 


Queremos resaltar que nunca se intente 
enchufar conector alguno por la parte 
posterior teniendo el Spectrum alimen- 
tado, esto llevaria en un amplio margen 
de probabilidades, a la destrucción ine- 
xorable del Spectrum. La razón de este 
consejo es que debido a que en el conec- 
tor posterior confluyen diversas tensio- 
nes (GND, +5, —5, 12V y 9V), tal co- 
mo se muestra en los dibujos. Una pe- 
queiia desviación titubeante o giro del 
conector podria dar lugar a que se cor- 
tocircuitaran pistas de las tensiones eléc- 
tricas mencionadas con pistas de sefia- 
les vecinas. Por ejemplo, si se desplazase 
un poco hacia la derecha en el momento 
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Detalle de la denominación de cada uno de los 
terminales en el conector posterior del Spectrum. 
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de la inserción, podría dar lugar a que 
la pista número 22A que lleva 12V inyec- 
tara los mismos en el terminal WAIT del 
microprocesador, conllevando esto su in- 
mediata destrucción. 

En los dibujos que acompaiian a este 
artículo mostramos la distribución de se- 
nales en el conector visto por la parte 
posterior del Spectrum y la agrupación 
funcional de todos sus terminales. Exis- 
ten únicamente cuatro terminales que no 
se usan: 

Dos ocupados por la hendidura y 
otros dos denominados NC (No connec- 
tion) no conectados. 


Descripción de los terminales 


Los 56 terminales del conector tienen, 
en su mayoria, cometidos específicos que 
tratamos a continuación agrupados fun- 
cionalmente. Ver figura número 2 en 
donde se muestra su correspondencia nu- 
mérica. 

— Afia AlIS: Estos dieciséis termina- 
les son las salidas directas del bus 
de direcciones del microprocesador 
sin amplificaeión interna alguna, 
por lo que un cortocircuito entre 
ellas o alteración de su impedan- 
cia daria lugar a que el programa 
en curso se perdiera. 

— DÓ A D7: Estos ocho terminales 
se corresponden con los ocho bits 
del bus de direcciones que también 
proceden directamente del micro- 
procesador, este bus permite el flu- 
jo de datos en los dos sentidos. 
Tampoco se encuentra amplifica- 
do, por lo que tiene las mismas ca- 
racterísticas que el bus de direccio- 
nes. 

— RD: Seiial de permiso de lectura. 
La rayita superior indica que es ac- 
tiva cuando está a cero lógico. 

— WR: Serial de permiso de escritura. 

— Mi: Esta senial es normalmente de 
poca utilidad. En esencia indica, 
haciendose cero, cuando el micro- 
procesador está tratando el byte de 
código de toda instrucción. 

— RFSH: Serial para el refresco del 
bloque de 16 K bytes de RAM DI- 
NAMICA. 

— IORQ: Seiial que activa los dispo- 
sitivos exteriores tratados por puer- 
tos. 

— MREQ: Serial para el acceso a me- 
moria. 

— IORQGE: Serial de acceso a la 
ULA. Tratada como puerto. 

— INT: Entrada de activación de las 
interrupciones enmascarables. 
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Entradas y salidas del Spectrum según su 


cometido funcinal. 


NMI: Entrada para la activación 
desde el exterior de las interrupcio- 
nes no enmascarables. 

ROMCS: Entrada para el bloqueo 
de la ROM de 16 K en donde resi- 
de el BASIC. 

RESET: Entrada desde el exterior 
para el borrado e inicialización del 
microprocesador (esta entrada fue 
usada en un artículo dedicado al 
reset en el número uno de MICRO 
HOBBY). Er 
BUSREQ: Entrada para solicitar 
desde el exterior la entrada a los 
buses del sistema, bloqueándose el 
microprocesador (Sirve para com- 
partir memoria por dos o más mi- 
croprocesadores). 

BUSACK: Salida por la que el 
Z-80 indica al dispositivo exterior 
que solicitó los buses, que ha par- 
tir de este momento los tiene dis- 
ponibles. 

WAIT: Entrada para detener o re- 
tardar la acción del microprocesa- 
dor. 

U: Salida de vídeo con la serial de 
color BY (Blue - Yellow). 

V: Salida de vídeo con la serial de 
color RY (Red - Yellow). 

Y: Salida de sincronismos de la se- 
nal de vídeo. 





— VIDEO: Salida de vídeo con la su- 
ma de color, luminancia y sincro- 
nismos. Ê 

— CLK: Salida del clock o reloj del 
sistema (3,5 Mhz.). 

— (GND: Masa del equipo. 

— +S5V: Salida de 5V para alimentar 
circuitos exteriores. 

— —SV: Salida de —SV, es de escasa 
potencia. 

— +12V: Salida de 12V, es también 
de escasa potencia. 

— —+9V: Salida directa de 9V desde el 
conector izquierdo del Spectrum 
(9V DC.). 

— +12V: Un (Unsmoothed) salida no 
conectada de 12V procedente del 
convertidor interno. 


Es el conector posterior una ventana 
para la extensión ilimitada de su Spec- 
trum. A este conector van adosados los 
distintos periféricos que se encuentran en 
el mercado y los que aparecerán. Ha de 
tener con él sumo cuidado y no abusar 
de la conexión y desconexión sistemáti- 
ca de los dispositivos exteriores de que 
ya disponga; porque esto acarrea un des- 
gaste y deterioro gradual de sus contac 
tos. 

Tampoco es aconsejable la conexió 
apilada de periféricos que aumentarí 
desmesuradamente la carga en los buses 
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Precios de programas 


Los precios que vienen 
puestos en los programas 
de la sección de los Mejores 
éson de alguna tienda o es- 
tablecimiento en especial?; 
y si es así gcuál es? 


M. Angel HERAS - Madrid 
[] En la cabecera de cada 
comentario de programa vie- 
nen impresos todos los da- 
tos de éste. El nombre es lo 
primero que aparece, un po- 
co más abajo vienen dos 
apartados diferenciados: en 
el primero, figura la compa- 
fila que ha realizado el pro- 
grama y, a la derecha de és- 
ta, tras una barra transver- 
sal, el nombre de la compa- 
fila que lo comercializa, y 
que además es la que nos 
ha proporcionado el progra- 
ma a nosostros, por tanto 
como es lógico, el precio 
que figura al final es el que 
nos ha dado dicha empresa. 


Reset de dos dases 


Quiero adquirir un ordena- 
dor y como profano quisie- 
ra hacerles algunas pregun- 
tas que les agradeceria me 
las contestaran lo más pron- 
to posible. 

1. En la instalación del re- 
set que publican en el n.º 
uno dicen que hay dos mo- 
delos, la versión 2 y la ver- 
sión 3B, esta última debido 
a la abertura disipa mejor el 
calor «cómo sabemos cuál 
es la verisón 3B?; ecuánto 
tiempo se puede tener co- 
nectado el Micro sin que el 
calor lo afecte? pues me han 
comentado que el Spectrum 
se calienta mucho. . 


Jorge FERNANDEZ - Madrid 
[] A simple vista, no es fá- 
cil observar cuál de las dos 
versiones del Spectrum le 
han vendido. Por lo que lo 
mejor es abrirlo aflojando 
los cinco tornillos inferiores 
y leer el texto indicativo de 
la versión en la parte inferior 
derecha de la tarjeta, inscri- 
to con letras blancas. El 
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tiempo que se puede tener 
el Spectrum conectado es 
indefinido, y no por ello se 
deteriorará, siempre claro 
está, que no se le tapen sus 
perforaciones de disipación. 
El calor que se nota al tocar 
la caja es debido, fundamen- 
talmente, al regulador de 
tensión interno y a la ULA. 


Un cassete para todos 


Quiero saber si para apli- 
car el cassette al ordenador 
(o sea sacar un cable del or- 
denador al cassette) lleva al- 
guna salida especial o por el 
contrario todo cassette pue- 
de servir. Voy a comprarme 
1 JOYSTICK y quiero saber 
si para ponérselo al SPEC- 
TRUM necesita otro aparato. 
Por favor, indíquenme el 
JOYSTICK más recomenda- 
ble y los distintos precios de 
los JOYSTICKS y de algún 
otro aparato que hiciera 
falta. 

Muchas gracias. 


Juan DIEGO - Barcelona 
[] Cualquier cassette que 
disponga de entrada de mi- 
crófono externo y salida pa- 
ra auricular sirve para ser 
usado con el Spectrum. Los 
Joystiks para ser conecta- 
dos al Spectrum necesitan 
una interface que se vende 
conjuntamente. En cuanto a 
precios y modelos de estos 
así como los distintos peri- 
féricos a usar con el Spec- 
trum encontrará información 
en la publicidad de Micro- 
hobby y en tiendas especia- 
lizadas. 


Programar en BASIC 


Tengo un JOYSTICK de la 
marca SPECTRAVIDEO, que 
acopla al ZX con un interfa- 
ce ZX SPECTRUM. Quisiera 
saber «qué instrucciones po- 
dria utilizar para programar 
en BASIC juegos que funcio- 
naran con el mismo (instru- 
ciones a afiadir en cualquier 
programa escrito en BASIC). 

Me he fijado que muchos 


programa BASIC utilizan en 
una misma línea de instruc- 
ciones varios colores al des- 
cribir una frase. Ejemplo: 
10 REM PROGRAMAfrojo) 
DE AYUDA(verde) AL USUA- 
RIO(azul) 

20 PRINT “PARA(verde) INI- 
CIAR EL PROGRAMA(rojo) 
PULSA(azul) LA TECLA J” 
(magenta) 

(Entre paréntesis se indi- 
can los colores que adquie- 
ren las palabras.) 

Mi pregunta es: Cómo lo- 
gran hacerlo? 


Javier LOPEZ FERRE - Barcelona 


[] El interface 2 de Sinclair 
es extremadamente fácil de 
utilizar, ya que el primer 
Joystick controla las teclas 
del 1 al 5 y el segundo las 
del 6 al ). Basta por lo tan- 
to con escribir su programa 
como si fuera a utilizar estas 
teclas. 

En cuanto a las restantes 
preguntas esperamos que 
en el nº 3 de la revista en- 
cuentre la información que 
desea. 


Problemas de tedado 


Tengo un ZX Spectrum, y 
para mí uno de sus principa- 
les problemas es su teclado; 
ya que sé escribir bien a má- 
quina, mis preguntas son las 
siguientes: 

— éMerece la pena com- 
prarse un teclado, por ejem- 
plo «el Teclado Multifución |, 
INDESCOMP»? 

— Son sus teclas al tac- 
to tan buenas como las de 
otros ordenadores mayores? 

— éPermite este teclado 
la incorporación de otros in- 
terfaces? 


José Ignacio ALONSO - Lugo 


[] Si utiliza Vd. su Spec- 
trum para tratamiento de 
textos es, desde luego, im- 
prescindible afiadirle un te- 
clado de los llamados «pro- 
fesionales». El de INDES- 
COMP es de buena calidad, 
aunque no tiene un tacto 
comparable al de las máqui- 


nas realmente profesionales. 
En cuanto a los periféri- 
cos, el teclado de INDES- 
COMP es perfectamente 
compatible con todos. 


Microdrive 


En primer lugar deseo fe- 
licitarles por su nueva revis- 
ta. Por otro lado he hecho el 
programa MICROCOPI y es 
muy bueno. Este programa, 
aunque está preparado para 
funcionar en cinta de cas- 
sette, yo, cambiando algu- 
nas líneas del Basic, he lo- 
grado grabarlo en el Micro- 
drive; lo que no consigo es 
que lea y grabe programas 
del Microdrive. Quisiera sa- 
ber si esto es posible cam- 
biando algunas líneas del 
DATA y, si esto es así, me 
diga cuáles y por qué nú- 
meros. 


José AGUILAR GONZALEZ 
Altea (Alicante) 


[] La ROM «enmascarada» 
del Interface 1, contiene ru- 
tinas distintas a las emplea- 
das por la ROM normal pa- 
ra las operaciones de lectu- 
ralescritura. Por ello no es 
posible adaptar MICROCOPI 
para microdrive. 


Presentudón de programas 


En la cinta HORIZONTES 
sale una «presentación» 
cuando el cassette se está 
cargando. Me gustaría saber 
cómo puedo hacer esta pre- 
sentación para mis progra- 
mas. Otra pregunta es: é«pa- 
ra qué sirve el Código Má- 
quina? Gracias. 


Juan Marcos MASMIQUEL - Baleares 


[] Lógicamente, lo primero 
que tiene que hacer es gra- 
bar en cassette la pantalla 
de presentación con la or- 
den SAVE «pantalla» 
SCREEN $. A continuación, 
necesita hacer un pequefio 
programa que se encargue 
de la carga de la pantalla del 
programa principal. Para evi- 


tar que el nombre del progra- 
ma se imprima en la panta- 
lla, estropeando el efecto, lo- 
calice una zona de la misma 
sin dibujo y sitúe ahí la po- 
sición de impresión. Un 
ejemplo, si la primera línea 
de la pantalla está libre y es, 
pongamos por caso, de co- 
lor negro, el programa sería 
como sigue: 


10: PAPER 6 :; INK Q: 
BORDER (Q: CLS 

20: LOAD “pantalla” 
SCREEN $ 


30: PRINT AT O; O 
40: LOAD “programa” 


Evitar errores 


Tengo un SPECTRUM 16K 
y tengo pensado comprarme 
uno de vuestros juegos pe- 
ro cuando voy a mirar las lis- 
tas veo que todos están en 
48K y mi ordenador no pue- 
de funcionar. Mi otro proble- 
ma es que cuando cargo un 
programa me pone en la par- 
te inferior estas letras: R TA- 
PE LOADING ERROR y en- 
tonces, el ordenador deja de 
funcionar. 


Roberto FERNANDEZ - Valladolid 


L] Efectivamente, los pro- 
gramas de 48K no funcionan 
en el SPECTRUM de 16 k, 
pero con las navidades a la 
vuelta de la esquina es tiem- 
po de ir pensando en una 
ampliación de memoria, ;no 
le parece? En cuanto al pro- 
blema de la carga de progra- 


mas es, por desgracia, bas- 


“tante clásico. Una buena 
"limpieza de las cabezas del 


magnetófono, rebobinar las 
cintas tras su utilización y 
NUNCA dejarlas cerca del 
televisor, son unas buenas 
precauciones. Por lo demás 
todo es cuestión de ir pro- 
bando diferentes posiciones 
de tono y volumen hasta en- 
contrar la más adecuada. Si 
es Vd. un poco manitas tam- 
bién puede probar a regular 
la altura de la cabeza de gra- 
bación. Y por supuesto al 
grabar sus programas no se 
olvide de desconectar la cla- 
vija EAR. 


Programar en código 
máquina 


Poseo un ZX-SPECTRUM 
de 48 K, y tengo una duda 
que paso a exponer: 

Estoy confeccionando un 
programa para que me haga 
unos cálculos concretos, y 
éstos se basan en un precio; 
«X», medida; «$» y, una refe- 
rencia; «&», y, tengo una can- 
tidad muy elevada para me- 
ter en memoria, entre otros 
cálculos en el mismo pro- 
grama. 

Tengo una Referencia «&», 
que sería una cantidad alfa- 
numérica que me solicitaría 
el programa/ordenador, y 
una vez introducida tendría 
que buscar en la memoria el 
precio que le corresponde 
«X», así como una medida, 


mioragEss 


PROGRAMAS EN MICRODRIVE ZX 
GESTION: 


Contabilidad (PNC) .............. ais 


Base de Datos 
Proceso de textos (Espafiol) 


Calc (Hoja electrónica) 

Facturación y control stocks 
P TECNICOS 

Agente de Bolsa 

Mediciones y presupuestos 


12.000 ptas. 


8.500 ptas. 


6.500 ptas. 
24.000 ptas. 


«$», lo que en BASIC, equi- 
vale a: 

IFINKEY $ = “& THE GO 
TO nnnn/GOSUB nnnn 


THEN LET C = «X» AND 
f = “$” RETURN/GO TO n 


La pregunta es: «Cómo 
puedo hacer lo mismo, en 
Código Máquina o cualquier 
otro lenguaje, para ahorrar al 
máximo y que no sea tan te- 
dioso el programarlo? 


Pedro GONZALEZ - Barcelona 


(] No entendemos muy 
bien el sentido de su pre- 
gunta, pero vamos a intentar 
orientarle: 

— Si su problema es la 
cantidad de memoria dispo- 
nible, el truco no está en el 
código máquina, sino en el 
empleo de variables o matri- 
ces alfanuméricas que con- 
sumen mucha menos me- 
moria que las numéricas, ya 
que estas últimas gastan 
6 bytes adicionales: cinco 
para la coma flotante y uno 
para el CHR $ 14 indicativo 
de número. 

— En cuanto al problema 
de tener que utilizar una lar- 
ga lista de INKEY $ para 
capturar las diversas teclas, 
puede solucionarlo utilizan- 
do el valor ASCII de las mis- 
mas. Por ejemplo, la utiliza- 
ción de las teclas A...Z le 
permite direccionar fácil- 


mente el flujo de su progra- 
ma con muy pocas instruc- 
ciones: 

LET A = CODE INKEY $ 

GOSUB A (O GOSUB A* 

100) 

— Donde sí puede ser de 
gran utilidad el código má- 
quina es en la búsqueda de 
los valores de la tabla. Seria 
muy largo explicarle un pro- 
grama completo, pero la 
idea general es cargar en el 
registro IX la dirección de la 
tabla a investigar (no utilice 
el registro IY que se emplea 
para apuntar a la dirección 
de las variables del sistema). 
Cargando los datos en el re- 
gistro B (acumulador). 

Y en realidad tampoco ne- 
cesita utilizar las parejas 
GOTO/GOSUB si utiliza una 
matriz como si fuera un ar- 
chivo indexado. Suponga- 
mos una matriz alfanuméri- 
ca DIM A $ (1), 16) a la que 
Vd. quiere llamar pulsando 
las teclas (P al 9. Los ocho 
primeros bytes de cada ele- 
mento contienen el valor AS- 
CIO del precio, y los ocho si- 
guientes, la medida (esto le 
da hasta 99.999.999). Una 
vez metidos los datos, su 
programa quedaria así: 

16 IF (INKEY $ “9” AND 
INKEY $ 0) THEN GOTO 10 

2 LET INDICE = (CODE 
INKEY $) — 47 /*CONVER- 
TIR A BINARIO*/ 

36 PRECIO = VAL A S$ 
(INDICE, 1 TO 8) 

36 MEDIDA = VAL A $ 
(INDICE, 9 TO 16) 


ESPECIALISTAS EN SINCLAIR 
SAQUELE RENTABILIDAD AL SPECTRUM 


PROGRAMAS EN CASSETTES 
EDUCATIVOS: 


Geografia | 
Geografia || 
Curso de Contabilidad | 


Curso de Contabilidad HH .....ccccc ss... 
Matemáticas (Geometria y Trigonom 


Superdesarrollos 1 x 2 


- 1.900 ptas. 
1.900 ptas. 
2.200 ptas. 

- 2.200 ptas. 
1.900 ptas. 


na te . 3.900 ptas 


Tambien disponibles en cassettes. 


(Imprime boletos con impresora ADMATE) 


CURSILLO DE BASIC GRATIS, Si COMPRA UN MICROORDENADOR 
ORDENADORES: arg Spectravideo, Commodore, Amstrand, Oirc, Katson... desde 1.239 ptas. al mes 
IMPRESO : Star. New-Print, Seikosha desde 774 ptas. al mes. Monitores Accesorios. 


AMPLIACIONES DE MEMORIA na 
Envios contra-reembolso, giro o talón conformado CiSilva, 5 - 4.º - Telf.: 242 24 71 - 28013 MADRID Necesitamos distribuidores de nuestros programas 
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: da Esparia. Poseemos más de 250 


e INTERCAMBIO programas pa- 
ra Spectrum 48 K. Sabre Wull, Ant 
Attack, Fred, Alchemist, Scuba Di- 
ve, Atic Atac, etc. Espero contes- 
tación por carta o por teléfono. Pe- 
dro Pérez Lifian. Parque de las Pal- 
meras, 15. Las Torres de Cotillas 
(Murcia). Tfno: (968) 62 64 17. 

e COMPRO un ordenador perso- 
nal Spectrum, Comodore 64, ó 
Anstrad. Económico. Lamar por las 
tardes al 734 58 14. Ester. 

e INTERCAMBIO programas. Ten- 
go más de 400. Marta Garcia. Vi- 
lia Begonia, 6, 4º. Haro (La Rioja). 
e INTERCAMBIO programas pa- 
ra Spectrum 16 ó 48 K. Más de 200 
títulos comerciales. Gabriel Sân- 
chez Madrid. C! Eduardo Toda, 46. 
4º 1º 08031 Barcelona. 

e CAMBIO programas para ZX 
Spectrum. Títulos comerciales. 
Juan L. Dz. de Corcuera. C/ Rioja, 
9 - 6b. 01005 Vitoria. Tino: 25 40 
93. 

e VENDO para ZX Spectrum 16 
ó 48 K: Interface programable in- 
descomp y palanca de juegos 
quickshot | de Spectravideo, todo 
ello casi nuevo, y regalo 8 juegos 
para ZX Spectrum. Todo por 7.875 
pts (negociable). Tino: 715 30 59 
(tardes) Raul Diaz. C/ Saliente, 59. 
Pozuelo de Alarcón. 28023 Madrid. 
e CAMBIO programas para ZX 
Spectrum: juegos, utilidades, ges- 
tión, aventuras, etc. Más de 300 tí- 
tulos comerciales (90% CM), na- 
cionales y de importación. Graba- 
ción garantizada. Feliciano Milla 
Garcés, Pza, José Antonio, 25º B. 
42004 Soria. Tíno:: (975) 22 37 00. 
e CAMBIO programas, llamar no- 
ches ai (91) 208 15 86. Antonio Her- 
nândez. 

e CAMBIO programas Spectrum, 
más de 300 títulos. José Luis Ex- 
pósito Crespo. C/ Alta, 46 B, Esc. 
C, 1º A 39008 Santander. 

e CAMBIO 400 programas para e! 
Spectrum 16/48 K. Mando lista. Es- 
cribir a José Luis Cantero Lorente. 
Bda. Federico Mayo GIF, 2. Jerez 
de la Frontera (Cádiz). Tfno: (956) 
34 56 68. 

e DESEARIA intercambiar progra- 
mas de todo tipo para el ZX 
Spectrum de 16 ó 48 K, con todos 
los usuarios de Espafia, así como 
dar a conocer la creación de un 
club de usuarios en Sevilla. Pregun- 
tar por Alberto Mateos Herrera al 
nº (954) 45 47 36, o escribir a la 
c!. Bermúdez de Castro, 4. Sevilla 
non. 

e CAMBIAMOS programas para 
el Spectrum de 16 y 48 K, con to- 


títulos, los interesados escribir a 


Pedro Jesús Hernández Agustín. C/ | 


Estadio, 6, 2º G. Valladolid 47006. 
Tfno: 23 96 91 (llamar de 3 a 3,50 
ó de 9a 11) Enviar listas. 

e VENDO ZX Spectrum 16K, In- 
terface 1 y Microdrive. Todo por 
60.000 pts. También incluyo 2 
cintas-cassettes, revistas, manual 
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de uso y libro «Cómo programar su 
Spectrum», José Luis. Tíno: (977) 
22 56 75. Tarragona. 

e INTERCAMBIO programas pa- 
ra el Spectrum 16/48K. Interesados 
escribir a Antonio Soriano Gonzá- 
lez. C/ Salamanca, 5. 46005 Valen- 
cia. Mando lista, 

e CAMBIO programas (juegos o 
aplicaciones) para el Spectrum 16 
ó 48 K. Más de 100 títulos. Pido y 
doy lista. Preferible en Asturias, en 
concreto en Avilés. Rafael Sepúl- 
veda Berenjena. C/ La Paz, 28, Bajo 
izda. Avilés (Asturias). 

e INTERCAMBIO programas pa- 
ra Spectrum. Luis. Tfno: 360 42 85. 
Valencia. 


SYVENDO Spectrum 48K con garantia. por 
35.000 pts: Regalo libro curso de programa: 
ción y revistas con programas. Félix Gonzá- 
lez Tino: 347 01 46, Barcelona, 

e COMPRO Spectrum 16K con 
manuales por 15.000 pts. Tfno.: (91) 
433 80 64 (Madrid). Francisco Mar- 
tinez. C/ Xabia, 7. 46010 Valencia. 
e INTERCAMBIO juegos y utilida- 
des para el Spectrum de 16/48 K. 
Más de 200 títulos, como Sabre 
Wull, Trasman, Stop Express, etc. 
Preguntar por Antonio Sánchez 
im Ttnos.: (968) 29 60 19 é 80 08 


e INTERCAMBIO: Cyrus, Manic 
Minter, Simulador de vuelo, Fighter 
Pilot, Jet Set, willy, Átic Atac. La Pul- 
ga, etc. David. Tino: (93) 431 05 47. 
Barcelona. 

e CAMBIO emisora de 27 Mhz 
Stalken IX 240 canales USB. 25B. 
AM. Factura compra por ZX Spec- 
trum, ofertas a Alejandro Garcia 
González. C/ Orense: 29-31, 1º 
Dcha. Ferrol (La Coruhia). Tino: 31 
01 81. 

e CAMBIO por juego El hobbit, 
uno de estos: Killer Kong, Atic Atac, 
Froggy.  Pheenix,  Ajedrez, 
Androide-2, Túneles marcianos O 
Wrekache. Pilar González Callejón. 
CI Medas, 4 - 6. Entlo. 2? Barcelo- 
na. Tino: 240 13 13. 

e CAMBIO juegos y programas 
para Spectrum de 16/48K. Tengo 
gran nº de juegos y hago buenas 
grabaciones. Interesados escribir a 
Antonio Fernández Berbel. C/ Cal- 
zada de Castro, 11. 3º G. 04006 Al 
meria. 

e COMPRO manual del Spectrum 


en castellano, un Spectrum 48K y. 


un Amplificador de sonido: Para 
más información llamar Tfno: (91) 
613 20 55. Madrid. 

e CAMBIO programas para ZX 
Spectrum 48K. Más de 200 títulos 
comerciales. Miguel Buades Sale- 
tas. C/ Soldado Bibiloni Vincens, 
3ºB. C-07015 (Porto-pi) Palma de 
Mallorca. 

e INTERCAMBIO Software para 
Spectrum 16/48K. Interesados 
mandar lista. Escribir a: Carles Jor- 
di Fernández | San José. Carretera 
a Bagá, 42-2º. Guardiola de Ber- 
guedá (Barcelona). 

e SE VENDE trum 48K, 


prácticamente nuevo, y 15 juegos 
valorados en más de 20.000 pis. 
Manic Miner, Scuba Dive, Jet Pac, 
etc. Todo por 40.000 pts. Javier. 
Ttno. 91/404 39 37, (de 7 a 10). 
e VENDO ordenador Sinclair QL 
a estrenar, provisto de 12 microdri- 
ves y cable para impresora. 110.000 
pts. Lorenzo Bandres. Tino. 446 88 
29, horas de oficina. 

e ME GUSTARIA contactar con 
usuarios del Spectrum en Burgos 
capital. Liamar el 20 19 72, (a par. 
tir de las 9 noche). Preguntar por 


Angel. 

e CAMBIO programas de 48K, de- 
seo especialmente de aventuras 
gráficas a ser posible con instruc- 
cines (sólo 48K). Vicente Sapifia 
Baldovi. C/ Sant Roc, 18-2º Sueca 
(Valencia). 

e VENDO ei siguiente material de 
HEWLETT PACKARD: 1- 82153 A 
Lápiz óptico. 1- 82160 A HP - IL In- 
terface. 1- 82161 A Cassette rápi- 
do. 1- 82162 A Impresora térmica. 
1- 82163 A Vídeo Interface. 1- 82181 
A Módulo ext. de memoria. Todo 
ello por el precio de 200.000 pts, 
y regalo módulo estadístico y de 
juegos, así como libros y documen- 
tación. Lamar al teléfono 91/457 44 
29, por las noches. José M? Juliá. 

e VENDO Spectrum 48K, con ga- 
rantia hasta abril/85, impecable, 
con conexiones, transformador y 
manual en castellano. Regalo cin- 
ta con 20 programas originales, 2 
libos sobre e! Spectrum, asi como 
todas las revistas ZX (estoy suscri- 
to hasta mayo/85), y MICRO- 
HOBBY. Todo ello por 30.000 pts. 
Miguel Ortiz Castillo. Pza. Mayor, 3. 
Liiria (Valencia) Tfno. 96/378 13 49. 
e INTERCAMBIO programas ZX 
Spectrum 16 ó 48K. Más de 125 
programas (Match point, Olimpicón, 
Full throttle, Hunter killer...) Escribir 
a hermanos Arroyo: Avenida de los 
Plateros, 8-4ºB o Ilamar al 22 83 
42 (955) preguntando por Alberto 
(tardes). 

e INTERCAMBIO programas, 
también los cambio por periféricos. 
Tengo 400. César Garcia. C/ Am- 
brosio Meabe, 5-2º Izg. Durango 
(Vizcaya). Tno: 94/681 22 97, 

e INTERCAMBIO programas pa- 
ra Spectrum, especialmente jue- 
gos. Dispongo alrededor de 400 
programas comerciales. Interesa- 
dos escribir a: Miguel Sanchis. Av- 
da. Ribera Baixa, 6, 46000 Corbe- 
ra (Valencia). 

e INTERCAMBIO todo tipo de pro- 
gramas e información con usuarios 
del Spectrum. Envio lista. Escribir 
a: Pere Anton Amadó Monsarra. C/ 
Sant Pere nº 2. Vilafranca del Pe- 
nedés (Barcelona). 


"e CAMBIO programas de juegos 
y utilidades para el Spectrum. Ten- 
go los mejores, (Bandera, Átic Atac, | 
"Flighter Pilot, Tansword-Contest, 

etc) Zona de Bilbao. A las maiia- 
nas, preguntar por Luken. Tfno. 415 . 


41 98, 
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ZX SPECTRUM 


Ya disponemos del Plan Nacional 
Contable para Microdrive. 


* Archivo de Cuentas 
256 ctas. 


* Archivo de Asientos 
1024 asientos. 


* Extracto de cuentas. 


* Balances de Sumas ' 
y saldos. 


* Balances de Situación. 
* Versiones para 1 6 2 


251 12 09 
Madrid-28007. 


MICRO-1 


oFERTA SPECTRUM 48 K 
+ 8 CINTAS 34.700 
CON 6 MESES DE GARANTIA 
SOFTWARE 20% DESCUENTO 


VEN A VERNOS! 


C/JORGE JUAN, Nº 116 
(METRO O'DONELL) 
MADRID, TFNO.: 252 88 11 


HACEMOS FACIL 
LA INFORMATICA 


“SINCLAIR e SPECTRAVIDEO 
eCOMMODORE e DRAGON 
SAMSTRAD e APPLE 
eSPERAY UNIVAC 
Modesto Lafuente, 63 Colomêsa, 3941 
Teit 253 94 54 Teit 45861 71 
28016 MADRID 


Padre Demudo, 18 
Teif 25986 13 
7806 MADRID 


78003 MADRID 


sosé Ortega y Gamer, 71 
Telf 4117850 

28006 MADRID 

Avda Gaudi, 15 
Tot 256 1014 
08015 BARCELONA 


Fera, VOO 

Teit, 221 23672 
78004 MADRID 
Erequeel Gonsktes 78 
Tel! 4368 65 
40002 SEGOVIA 


Stuart, ? 
Teit 851 70 38 
ARANIUÊZ (Mesa) 


ANUNCIESE 
EN 
MODULOS 


Tels.: 733 59 04 - 733 50 12 
Sefiorita Marisa 





ZX Spectrum + 
(64K) 


ara los que exigen + 










ca 
vestross 


on, 62 0210 
TOMAS se Y) a61 82 , 


1 ee 239 a mM CO ç 
A 5 M ADRID 


LIDERA 
TUIMALINALIUN 


Darienda svelta atu fantasia 
porque las diversiones 
más emocionantes te esperan en 


VMA 
L= ir ve =mT Ed [CI ES 


SOMOS PROFESIONALES 


BRAVO MURILLO, 2 (apare. gratuito en C/. Magallanes, 1). Tel: 446 62 3] 


DIEGO DE LEON, 25 (apare. gratuito en C/. Nuhez de Balboa, 114). Tel: 261 88 01 MADRID 





SI NO QUIERE TECLEAR SUS PROGRAMAS 


MICROHOBBY LOS GRABA POR USTED: 


(cortar por esta linea) 


SOLICITUD DE CINTAS DE PROGRAMAS 


Cada mes ponemos a su disposición una cinta con todos los 
programas publicados en los cuatro números de dicho mes. 








Deseo recibir en mi domicilio la(s) cinta(s) que indico a continuación, 
al precio de 550 pts. cada una, más 75 pts. de gastos de envio 
certificado por cada cinta solicitada. 


[ ] Números 1 al 4 L] Del 9 al 12 

L] Del5al 8 L] Del 13 al 16 
So ADE EEE DEAN EDAD...i 
APELRIEMO SS seas sirTi AI DS AS O RR OD EITA 
DOING cao OR A E cds 
CR Ii ea A a cito aids pinça Bi E ANE E SE DN NS 
ED E A PI past 7 BIS DO 8; II PD 
Morco:con una [i) en al cosilioro-correspondiante la forma de pago que mós:me-conviene. 
É Jaiênboncorio ndiunioonombre HOUBV PRESS, SA. LIiGio Postal NS... ssssessrirtinesesiuiivarseçiãs L ] Contra reemboko 
TARJETA DE CREDITO: L | ia MIGA NO aaa sa [] MASTER CHARGE N.º... 
Fecha de caducidad de la tarjeta............ccc esses sssssesesseseeeees Firmo: 





S] NO QUIERE TECLEAR SUS PROGRAMAS, 
VICROHOBBY LOS GRABA POR USTED: 


Franqueo 
Postal 


HOBBY PRESS, S. A. 





MADRID 


iSUSCRIBET E À MICROHOBBY V AHORRA 850 PTS, 


(Y PARTICIPA AUTOMATICAMENTE EN NUESTROS SORTEOS ESPECIALES) 


fcortar por esta linea) 


TARJETA DE SUSCRIPCION AHORRO 


Oferta especial para recibir en su domicilio, todo un afio de | 
revista semanal Microhobby con un descuento de 850 ptas., u 
regalo por valor de 2.000 ptas. y participación en todos los sorteo 


CADA MES, UN SORTEO ENTRE 








FECHA LIMITE DE RESPUESTA: LOS SUSCRIPTORES. UN 
30 DE ENERO DE 1985 ORDENADOR QL Y TRES MICRODRIVES 
RESPONDA HOY MISMO! EAR o o PUEDEN 


Deseo suscribirme a MICROHOBBY durante un afio por sólo 3.900 PTAS., lo que me supone un AHORRO DE 850 PTA 


El primer número que deseo recibir es el 


Enviéme GRATIS, como REGALO, la cinta de programas que le indico con una (X) 
GOLF.......... E UTILIDADES......... () 10 JUEGOS......... () 


Respondiendo antes de la última semana de noviembre quedo incluido en los TRES SORTEOS de esta oferta, sólo en dos e 


la última semana de diciembre y en uno, en la última semana de enero. |JCUANTO ANTES RESPONDA EN MAS 
SORTEOS PARTICIPARE! 


NOMBRE 


RS O DE 
REED cais 
EMO BC LIS: sus gsm picos cora OS AO TORO QUA UU e rege 
CIUDALA suas qrsaseunaca raras cais aninaras as una caga a gaS es cas A RCC ni a saci asas aa pa PROVINCIA ccaseeesamsas cons crase raciais eae 
Cs ROM AL casas smerasenairsasas TELEFONO is.e coca messaco soon amaram PROFESION 


O er... 


Marco con una (X) en el casillero correspondiente la forma de pago que más me conviene. 
[) Talón bancario adjunto a nombre HOBBY PRESS, S.A, [) UE PO NO assess cio teasprismtaniqaoa 
TARJETA DE CREDITO: [| Em ES [] 


Fecha de caducidad de lo tarjeta 


[] Contra reembolso del primer número, junto a la cassette-rega 
MASTER CHARGE N.º... 
E tai 24 


Firma: 





CCC E Ina au. 





Franqueo 
Postal 


HOBBY PRESS, S. A. 
Apartado de Correos 
nº 54.062 (Apartados Altos) 


MADRID 
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